# load the NYPD dataset and the packages that we will use
NYPD <- read.csv("Data/2018_sqf_database-abbr.csv")
library(tidyverse)
## ── Attaching packages ─────────────────────────────────────── tidyverse 1.3.1 ──
## ✓ ggplot2 3.3.5 ✓ purrr 0.3.4
## ✓ tibble 3.1.6 ✓ dplyr 1.0.8
## ✓ tidyr 1.2.0 ✓ stringr 1.4.0
## ✓ readr 2.1.2 ✓ forcats 0.5.1
## ── Conflicts ────────────────────────────────────────── tidyverse_conflicts() ──
## x dplyr::filter() masks stats::filter()
## x dplyr::lag() masks stats::lag()
library(ggplot2)
library(magrittr)
##
## Attaching package: 'magrittr'
## The following object is masked from 'package:purrr':
##
## set_names
## The following object is masked from 'package:tidyr':
##
## extract
# The number of stops in each month in the year 2018
# rearrange the months in order, from January to December
reorder_month <- c("January","February","March","April","May","June","July","August","September","October","November","December")
NYPD$MONTH2 = factor(NYPD$MONTH2,levels=reorder_month)
ggplot(NYPD, aes(MONTH2)) + geom_bar(alpha=0.90, colour="orange", fill="orange",width=0.75) + labs(title="", y="number of stops", x="month")
# The number of stops on each day of the week
# rearrange the days in order, from Monday to Sunday
reorder_day <- c("Monday","Tuesday","Wednesday","Thursday","Friday","Saturday","Sunday")
NYPD$DAY2 = factor(NYPD$DAY2,levels=reorder_day)
ggplot(NYPD, aes(DAY2)) + geom_bar(alpha=0.90, colour="salmon", fill="salmon",width=0.75) + labs(title="", y="number of stops", x="day")
## Stop.Frisk.Time: the time when ppl are stopped
# Function: rounding(inputNum, totalNum)
rounding <- function(inputNum, totalNum) {
if(is.na(inputNum)){return(FALSE)}else{
m <- totalNum/2
if(inputNum < m){
# round down
return(FALSE)
}else{
#round up
return(TRUE)
}
}
}
hour<-NYPD$Stop.Frisk.Time
all_hour <- c()
for(i in 1:length(hour)){
if(hour[i] == "#N/A" || is.na(hour[i]) || hour[i] == "" || hour[i] == FALSE){
hour[i] <- "NA"
}else{
temp <- c(strsplit(hour[i], ":"))
minBefore <- temp[[1]][[2]]
hourBefore <- temp[[1]][[1]]
if (rounding(strtoi(minBefore), 60)){
hourAfter <- as.character(strtoi(hourBefore)+1)
if (hourAfter == 24){
hourAfter <- "0"
}
}else{
hourAfter <- hourBefore
}
all_hour <- append(all_hour, hourAfter)
}
allH_df <- data.frame(all_hour)
}
reorder_hour <- c("0","1","2","3","4","5","6","7","8","9","10","11","12","13","14","15","16","17","18","19","20","21","22","23","NA")
allH_df$all_hour = factor(allH_df$all_hour,levels=reorder_hour)
ggplot(allH_df, aes(all_hour)) + geom_bar(alpha=0.90, colour="salmon", fill="salmon",width=0.75) + labs(title="", y="number of stops", x="hour")
# Morning: from sunrise to 11:59 AM. Sunrise typically occurs around 6 AM.
# Noon: at 12:00 PM.
# Afternoon: from 12:01 PM to around 5:00 PM.
# Evening: from 5:01 PM to 8 PM, or around sunset.
# Early Night: from sunset 11:59 PM
# Late Night: from 11:59 PM to sunrise around 5:59 AM.
all_period <- c()
for(i in 1:length(allH_df$all_hour)){
if (allH_df$all_hour[i] == "6" || allH_df$all_hour[i] == "7" || allH_df$all_hour[i] == "8" || allH_df$all_hour[i] == "9" || allH_df$all_hour[i] == "10" || allH_df$all_hour[i] == "11"){
all_period <- append(all_period, "Morning")
}else if(allH_df$all_hour[i] == "12"){
all_period <- append(all_period, "Noon")
}else if(allH_df$all_hour[i] == "13" || allH_df$all_hour[i] == "14" || allH_df$all_hour[i] == "15" || allH_df$all_hour[i] == "16"){
all_period <- append(all_period, "Afternoon")
}else if(allH_df$all_hour[i] == "17" || allH_df$all_hour[i] == "18" || allH_df$all_hour[i] == "19" || allH_df$all_hour[i] == "20" || allH_df$all_hour[i] == "21" || allH_df$all_hour[i] == "22" || allH_df$all_hour[i] == "23"){
all_period <- append(all_period, "Early Night")
}else{
all_period <- append(all_period, "Late Night")
}
}
allP_df <- data.frame(all_period)
reorder_period <- c("Morning", "Noon", "Afternoon", "Early Night", "Late Night")
allP_df$all_period = factor(allP_df$all_period,levels=reorder_period)
ggplot(allP_df, aes(all_period)) + geom_bar(alpha=0.90, colour="salmon", fill="salmon",width=0.75) + labs(title="", y="number of stops", x="time period")
## Compare: the number of male police officers(POM) and the number of female police officers(POF)
# create POM and POF dataframes
df_male_officer <- NYPD %>% filter(ISSUING_OFFICER_RANK == "POM")
df_female_officer <- NYPD %>% filter(ISSUING_OFFICER_RANK == "POF")
head(df_male_officer)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 1 1 19:04:00 2018 January Monday Based on C/W on Scene
## 2 2 23:00:00 2018 January Monday Based on Radio Run
## 3 3 23:55:00 2018 January Monday Based on Radio Run
## 4 4 3:23:00 2018 January Monday Based on Radio Run
## 5 5 3:23:00 2018 January Monday Based on Radio Run
## 6 6 21:20:00 2018 January Monday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 1 POM 1 SGT
## 2 POM 34 SGT
## 3 POM 808 SGT
## 4 POM 63 SGT
## 5 POM 63 SGT
## 6 POM 71 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 1 1 0
## 2 34 1
## 3 808 0
## 4 63 2
## 5 63 2
## 6 71 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 1 MENACING 18
## 2 CPW 15
## 3 GRAND LARCENY 10
## 4 ROBBERY 15
## 5 ROBBERY 15
## 6 UNAUTHORIZED USE OF A VEHICLE 15
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 1 1 0
## 2 1 0
## 3 1 0
## 4 1 0
## 5 1 0
## 6 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 1 0 0 1
## 2 0 0 1
## 3 0 0 1
## 4 1 ROBBERY 1
## 5 1 ROBBERY 1
## 6 0 0 1
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 1 1 0 0 0
## 2 1 1 0 0
## 3 1 0 0 0
## 4 1 1 0 0
## 5 1 1 0 0
## 6 1 0 1 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG PHYSICAL_FORCE_CEW_FLAG
## 1 0 0 0 0
## 2 0 0 0 0
## 3 0 0 0 0
## 4 0 0 0 0
## 5 0 0 0 0
## 6 0 0 0 0
## PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG
## 1 0 0
## 2 1 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## PHYSICAL_FORCE_OC_SPRAY_USED_FLAG PHYSICAL_FORCE_OTHER_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## PHYSICAL_FORCE_RESTRAINT_USED_FLAG PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 1 0 1
## 2 0 0
## 3 0 1
## 4 1 1
## 5 1 1
## 6 0 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 1 0
## 2 0
## 3 1
## 4 1
## 5 1
## 6 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 1 0
## 2 0
## 3 0
## 4 0
## 5 0
## 6 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 1 0
## 2 0
## 3 0
## 4 0
## 5 0
## 6 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 1 1
## 2 0
## 3 0
## 4 0
## 5 0
## 6 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 1 1 0
## 2 1 0
## 3 1 0
## 4 1 0
## 5 1 0
## 6 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 1
## 5 0 1
## 6 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 1 1 0
## 2 0 0
## 3 1 0
## 4 0 0
## 5 0 0
## 6 1 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 1 0 0
## 2 0 1
## 3 0 0
## 4 0 1
## 5 0 1
## 6 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 1 0 COOPERATIVE 0
## 2 0 NERVOUS 26
## 3 0 RELIEVED 40
## 4 0 COMPLAIN 38
## 5 0 COMPLAINT 36
## 6 0 NERVOUS 20
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 1 MALE WHITE 5.1 170
## 2 MALE BLACK HISPANIC 6.1 250
## 3 MALE WHITE HISPANIC 5.5 150
## 4 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.1 160
## 5 MALE WHITE 5.11 230
## 6 MALE BLACK 5.1 150
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 1 MED BRO BLK
## 2 HEA BRO BLK
## 3 THN BRO BLD
## 4 MED BRO BLK
## 5 MED BRO BLK
## 6 THN BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 1 1 VARICK STREET && FRANKLIN STREET
## 2 34 DYCKMAN STREET && POST AVENUE
## 3 43 2245 RANDALL AVENUE
## 4 63 EAST 38 STREET && AVENUE L
## 5 63 EAST 38 STREET && AVENUE L
## 6 67 178 ROCKAWAY PARKWAY
## STOP_LOCATION_BORO_NAME
## 1 MANHATTAN
## 2 MANHATTAN
## 3 BRONX
## 4 BROOKLYN
## 5 BROOKLYN
## 6 BROOKLYN
head(df_female_officer)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 1 16 0:45:00 2018 January Monday Based on Self Initiated
## 2 17 0:45:00 2018 January Monday Based on Self Initiated
## 3 18 0:45:00 2018 January Monday Based on Self Initiated
## 4 19 0:45:00 2018 January Monday Based on Self Initiated
## 5 20 0:45:00 2018 January Monday Based on Self Initiated
## 6 28 14:50:00 2018 January Tuesday Based on Radio Run
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 1 POF 802 SGT
## 2 POF 802 SGT
## 3 POF 802 SGT
## 4 POF 802 SGT
## 5 POF 802 SGT
## 6 POF 804 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 1 802 1
## 2 802 1
## 3 802 1
## 4 802 1
## 5 802 1
## 6 804 10
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES OFFICER_EXPLAINED_STOP_FLAG
## 1 CPW 5 1
## 2 CPW 5 1
## 3 CPW 5 1
## 4 CPW 4 1
## 5 CPW 4 1
## 6 CRIMINAL TRESPASS 10 1
## OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION SUSPECT_ARRESTED_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG FRISKED_FLAG SEARCHED_FLAG
## 1 0 1 1 0
## 2 0 1 1 0
## 3 0 1 1 0
## 4 0 1 1 0
## 5 0 1 1 0
## 6 0 1 0 0
## OTHER_CONTRABAND_FLAG FIREARM_FLAG KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG
## 1 0 0 0 0
## 2 0 0 0 0
## 3 0 0 0 0
## 4 0 0 0 0
## 5 0 0 0 0
## 6 0 0 0 0
## WEAPON_FOUND_FLAG PHYSICAL_FORCE_CEW_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## PHYSICAL_FORCE_OC_SPRAY_USED_FLAG PHYSICAL_FORCE_OTHER_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## PHYSICAL_FORCE_RESTRAINT_USED_FLAG PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 1 0 1
## 2 0 1
## 3 0 1
## 4 0 1
## 5 0 1
## 6 0 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 1 1
## 2 1
## 3 1
## 4 1
## 5 1
## 6 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 1 1
## 2 0
## 3 0
## 4 0
## 5 0
## 6 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 1 1
## 2 0
## 3 1
## 4 1
## 5 1
## 6 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 1 1
## 2 1
## 3 1
## 4 1
## 5 1
## 6 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 1 0 1
## 2 0 1
## 3 0 1
## 4 0 1
## 5 0 1
## 6 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 1 0 N/A 18
## 2 0 N/A 0
## 3 0 N/A 0
## 4 0 N/A 0
## 5 0 N/A 0
## 6 0 N/A 26
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 1 MALE BLACK 5.5 140
## 2 MALE BLACK 5.1 120
## 3 MALE BLACK 5.6 160
## 4 MALE BLACK 5.6 150
## 5 MALE BLACK 5.4 160
## 6 MALE BLACK 5.8 160
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 1 THN BRO BLK
## 2 THN BRO BLK
## 3 THN BRO BLK
## 4 THN BRO BLK
## 5 THN BRO BLK
## 6 MED BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 1 73 131 BELMONT AVENUE BROOKLYN
## 2 73 131 BELMONT AVENUE BROOKLYN
## 3 73 131 BELMONT AVENUE BROOKLYN
## 4 73 131 BELMONT AVENUE BROOKLYN
## 5 73 131 BELMONT AVENUE BROOKLYN
## 6 9 890 EAST 6 STREET MANHATTAN
# visualize the difference in numbers: frequency table, bar plot, pie chart
male_female_num <- tibble(
type = c("male officer", "female officer"),
freq = c(nrow(df_male_officer), nrow(df_female_officer))
)
knitr::kable(male_female_num)
| type | freq |
|---|---|
| male officer | 9251 |
| female officer | 1225 |
p <- ggplot(data = male_female_num, mapping = aes(
x = type, y = freq ))
p + geom_col() +
labs(x = "number of officers",
y = "sex")
p2 <- ggplot(data = male_female_num, mapping = aes(
x = 1, y = freq, fill = type ))
p2 + geom_col() +
coord_polar(theta = "y") +
scale_x_discrete(name = NULL, breaks = NULL) +
scale_y_discrete(name = NULL, breaks = NULL) +
labs(fill = "Cut")
# function: to calculate the bounds of a numeric vector, will be used in the following analysis
bound <- function(x){
Q1 <- quantile(x, .25)
Q3 <- quantile(x, .75)
IQR <- Q3-Q1
bound <- c(Q1-1.5*IQR, Q3+1.5*IQR)
return(bound)
}
### Observed duration minutes.
## Overall analysis first
# Histogram --- all data(not excludes any values)
ggplot(NYPD,aes(OBSERVED_DURATION_MINUTES)) + geom_histogram(colour = "royalblue1", fill = "royalblue1",alpha=0.8) + labs(title="Distribution of Suspects' Observed Duration Minutes (including outliers)", y="count", x="observed duration mins")
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
# Histogram --- excludes theoretical outliers (use bound() function to calculate and exclude the theoretical outliers)
bound(NYPD$OBSERVED_DURATION_MINUTES)
## 25% 75%
## -0.5 3.5
ggplot(NYPD,aes(OBSERVED_DURATION_MINUTES)) + geom_histogram(breaks=seq(0,3.5,by=1), colour = "royalblue1", fill = "royalblue1",alpha=0.8) + labs(title="Distribution of Suspects' Observed Duration Minutes (excluding outliers)", y="count", x="observed duration mins")
# Histogram --- excludes large numbers (since the distribution of Odm is too right-skewed, which makes the upper bound (3.5) calculated by bound() pretty small; so we decide to set another upper bound (35) based on the distribution that we observe from the table to look at more complete data)
table(NYPD$OBSERVED_DURATION_MINUTES)
##
## 0 1 2 3 4 5 6 7 8 9 10 12 13
## 1317 6680 1315 377 59 644 13 8 15 3 225 3 1
## 14 15 18 20 23 24 25 30 40 45 46 59 60
## 3 53 2 46 2 2 10 146 5 2 1 1 8
## 81 100 104 120 156 200 345 417 521 525 824 910 925
## 1 1 1 4 1 2 1 1 1 1 1 1 1
## 953 1029 1150 1200 1259 1300 1420 1450 1502 1535 1539 1545 1558
## 1 1 1 3 1 1 2 1 1 1 1 1 1
## 1600 1609 1643 1700 1709 1725 1728 1730 1829 1909 1943 1945 1950
## 1 3 1 1 1 2 2 1 1 1 1 1 1
## 2000 2032 2121 2140 2155 2230 2320 2321 24804 99999
## 2 1 1 2 1 3 3 2 1 1
ggplot(NYPD,aes(OBSERVED_DURATION_MINUTES)) + geom_histogram(breaks=seq(0,35,by=1), colour = "royalblue1", fill = "royalblue1",alpha=0.8) + labs(title="Distribution of Suspects' Observed Duration Minutes (excluding large numbers)", y="count", x="observed duration mins")
# Observe time: male officers VS female officers(excludes large numbers)
df_pom_pof <- NYPD[NYPD$ISSUING_OFFICER_RANK == "POM" | NYPD$ISSUING_OFFICER_RANK == "POF",]
ggplot(df_pom_pof, aes(x = ISSUING_OFFICER_RANK, y = OBSERVED_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 35))
# Observe time: male officers VS female officers (excludes theoretical outliers)
ggplot(df_pom_pof, aes(x = ISSUING_OFFICER_RANK, y = OBSERVED_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 3.5))
### Stop duration minutes.
## Overall analysis first
# Histogram --- all data(not excludes any values)
ggplot(NYPD,aes(STOP_DURATION_MINUTES)) + geom_histogram(colour = "royalblue3", fill = "royalblue3",alpha=0.8) + labs(title="Distribution of Suspects' Stopped Duration Minutes (including outliers)", y="count", x="stop duration mins")
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
# Histogram --- excludes theoretical outliers (use bound() function to calculate and exclude the theoretical outliers)
bound(NYPD$STOP_DURATION_MINUTES)
## 25% 75%
## -10 30
ggplot(NYPD,aes(STOP_DURATION_MINUTES)) + geom_histogram(breaks=seq(0,30,by=1), colour = "royalblue1", fill = "royalblue1",alpha=0.8) + labs(title="Distribution of Suspects' Stopped Duration Minutes (excluding outliers)", y="count", x="stop duration mins")
# Histogram --- excludes large numbers (since the distribution of Sdm is too right-skewed, which makes the upper bound (30) calculated by bound() small; so we decide to set another upper bound (50) based on the distribution that we observe from the table to look at more complete data)
table(NYPD$STOP_DURATION_MINUTES)
##
## 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
## 51 531 705 638 300 2583 237 292 336 144 1970 81 156 125 95 780
## 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31
## 60 71 85 18 584 30 39 32 38 147 22 23 26 15 340 9
## 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47
## 17 12 10 43 11 8 13 6 56 9 9 3 3 49 1 11
## 48 49 50 51 52 53 54 55 58 59 60 62 63 67 70 72
## 3 3 23 1 4 3 4 7 2 1 37 3 2 1 2 1
## 73 75 78 80 83 84 85 90 93 94 95 96 100 103 120 121
## 1 1 1 6 1 1 3 8 1 1 1 1 1 1 5 3
## 125 130 141 145 150 151 153 155 160 161 162 164 170 173 180 181
## 1 3 2 1 3 1 1 1 4 2 1 1 1 1 3 1
## 184 190 195 202 203 205 214 215 220 221 223 225 232 233 418 528
## 2 2 3 1 1 1 1 1 1 1 3 1 2 1 1 1
## 999
## 1
ggplot(NYPD,aes(STOP_DURATION_MINUTES)) + geom_histogram(breaks=seq(0,50,by=1), colour = "royalblue3", fill = "royalblue3",alpha=0.8) + labs(title="Distribution of Suspects' Stopped Duration Minutes (excluding large numbers)", y="count", x="stop duration mins")
# Stop time: male officers VS female officers(excludes large numbers)
df_pom_pof <- NYPD[NYPD$ISSUING_OFFICER_RANK == "POM" | NYPD$ISSUING_OFFICER_RANK == "POF",]
ggplot(df_pom_pof, aes(x = ISSUING_OFFICER_RANK, y = STOP_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 50))
# Observe time: male officers VS female officers (excludes theoretical outliers)
ggplot(df_pom_pof, aes(x = ISSUING_OFFICER_RANK, y = STOP_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 30))
## Relation between Observed Duration Minutes and Stop Duration Minutes
# all data(Not excludes any values)
ggplot(NYPD, aes(OBSERVED_DURATION_MINUTES, STOP_DURATION_MINUTES)) + geom_point() + labs(title="The Relation between Observed Time and Stop Time", subtitle="(with all data)", y="stop duration mins", x="observed duration mins")
# excludes large numbers
ggplot(NYPD, aes(OBSERVED_DURATION_MINUTES, STOP_DURATION_MINUTES)) + geom_point() + coord_cartesian(xlim=c(0, 35), ylim=c(0, 50)) + labs(title="The Relation between Observed Time and Stop Time", subtitle="(excluding large numbers)", y="stop duration mins", x="observed duration mins")
# excludes theoretical outliers
ggplot(NYPD, aes(OBSERVED_DURATION_MINUTES, STOP_DURATION_MINUTES)) + geom_point() + coord_cartesian(xlim=c(0, 3.5), ylim=c(0, 30)) + labs(title="The Relation between Observed Time and Stop Time", subtitle="(excluding outliers)", y="stop duration mins", x="observed duration mins")
### Suspected crime description.
unique(NYPD$SUSPECTED_CRIME_DESCRIPTION)
## [1] "MENACING"
## [2] "CPW"
## [3] "GRAND LARCENY"
## [4] "ROBBERY"
## [5] "UNAUTHORIZED USE OF A VEHICLE"
## [6] "OTHER"
## [7] "ASSAULT"
## [8] "BURGLARY"
## [9] "PETIT LARCENY"
## [10] "CRIMINAL POSSESSION OF MARIHUANA"
## [11] "CRIMINAL TRESPASS"
## [12] "GRAND LARCENY AUTO"
## [13] "THEFT OF SERVICES"
## [14] "RECKLESS ENDANGERMENT"
## [15] "CRIMINAL POSSESSION OF CONTROLLED SUBSTANCE"
## [16] "CPSP"
## [17] "RAPE"
## [18] "CRIMINAL SALE OF CONTROLLED SUBSTANCE"
## [19] "FORCIBLE TOUCHING"
## [20] "CRIMINAL MISCHIEF"
## [21] "AUTO STRIPPIG"
## [22] "MAKING GRAFFITI"
## [23] "CRIMINAL SALE OF MARIHUANA"
## [24] "CRIMINAL POSSESSION OF FORGED INSTRUMENT"
## [25] "TERRORISM"
## [26] "MURDER"
## [27] "PROSTITUTION"
## since there are too many types of crimes, we divide them into 4 main categories:
# THEFT: "GRAND LARCENY AUTO", "BURGLARY", "CPSP(criminal possession of stolen property)", "GRAND LARCENY", "PETIT LARCENY", "ROBBERY", "THEFT OF SERVICES", "UNAUTHORIZED USE OF A VEHICLE";
# ATTACK AND DAMAGE: "AUTO STRIPPIG", "ASSAULT", "CRIMINAL TRESPASS", "FORCIBLE TOUCHING", "MENACING", "MURDER", "RECKLESS ENDANGERMENT", "PROSTITUTION", "RAPE";
# POSSESSION, SALE OF PROHIBITED ITMES: "CPW(criminal possession of a weapon)", "CRIMINAL POSSESSION OF CONTROLLED SUBSTANCE", "CRIMINAL POSSESSION OF FORGED INSTRUMENT", "CRIMINAL POSSESSION OF MARIHUANA", "CRIMINAL SALE OF CONTROLLED SUBSTANCE", "CRIMINAL SALE OF MARIHUANA";
# Others: "CRIMINAL MISCHIEF", "MAKING GRAFFITI", "TERRORISM", "OTHER";
NYPD$CRIME_CATEGORIZATION <- vector(mode='character', length(NYPD$SUSPECTED_CRIME_DESCRIPTION))
for(i in seq_along(NYPD$SUSPECTED_CRIME_DESCRIPTION)){
if(NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "GRAND LARCENY AUTO" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "BURGLARY" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "CPSP" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "GRAND LARCENY" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "PETIT LARCENY" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "ROBBERY" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "THEFT OF SERVICES" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "UNAUTHORIZED USE OF A VEHICLE" ){
NYPD$CRIME_CATEGORIZATION[i] <- "Theft"
}else if (NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "AUTO STRIPPIG" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "ASSAULT" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "CRIMINAL TRESPASS" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "FORCIBLE TOUCHING" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "MENACING" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "MURDER" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "RECKLESS ENDANGERMENT" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "PROSTITUTION" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "RAPE" ) {
NYPD$CRIME_CATEGORIZATION[i] <- "Attack and Damage"
}else if (NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "CPW" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "CRIMINAL POSSESSION OF CONTROLLED SUBSTANCE" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "CRIMINAL POSSESSION OF FORGED INSTRUMENT" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "CRIMINAL POSSESSION OF MARIHUANA" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "CRIMINAL SALE OF CONTROLLED SUBSTANCE" | NYPD$SUSPECTED_CRIME_DESCRIPTION[i] == "CRIMINAL SALE OF MARIHUANA"){
NYPD$CRIME_CATEGORIZATION[i] <- "Possession,Sale of Prohibited Items"
}
else{
NYPD$CRIME_CATEGORIZATION[i] <- "Others"
}
}
ggplot(NYPD, aes(CRIME_CATEGORIZATION)) + geom_bar(alpha=0.90, colour="red4", fill="red4",width=0.5) + labs(title= "Different Types of Crimes Suspected", y="count", x="types of crimes suspected")
## And then we make 4 separate bar plots -- 1 for each category, showing the distribution of the different crime descriptions inside each category
# Theft:
df_theft <- NYPD[NYPD$CRIME_CATEGORIZATION == "Theft",]
sum_theft <- NYPD %>% filter(CRIME_CATEGORIZATION == "Theft") %>% nrow()
print(paste("sum of theft: ",sum_theft))
## [1] "sum of theft: 4421"
ggplot(df_theft, aes(SUSPECTED_CRIME_DESCRIPTION)) + geom_bar(alpha=0.90, colour="red4", fill="red4",width=0.5) + labs(title= "Theft Suspected", y="count", x="types of theft suspected") + theme(axis.text.x=element_text(size=4.1))
# Attack and Damage:
df_att_dam <- NYPD[NYPD$CRIME_CATEGORIZATION == "Attack and Damage",]
sum_att_dam <- NYPD %>% filter(CRIME_CATEGORIZATION == "Attack and Damage") %>% nrow()
print(paste("sum of attack and damage: ",sum_att_dam))
## [1] "sum of attack and damage: 2391"
ggplot(df_att_dam, aes(SUSPECTED_CRIME_DESCRIPTION)) + geom_bar(alpha=0.90, colour="red4", fill="red4",width=0.5) + labs(title= "Attack and Damage Suspected", y="count", x="types of attack and damage suspected") + theme(axis.text.x=element_text(size=4.5))
# Possession, Sale of Prohibited Items:
df_proh_items <- NYPD[NYPD$CRIME_CATEGORIZATION == "Possession,Sale of Prohibited Items",]
sum_prob_items <- NYPD %>% filter(CRIME_CATEGORIZATION == "Possession,Sale of Prohibited Items") %>% nrow()
print(paste("sum of possession,sale of prohibited items: ",sum_prob_items))
## [1] "sum of possession,sale of prohibited items: 3430"
ggplot(df_proh_items, aes(SUSPECTED_CRIME_DESCRIPTION)) + geom_bar(alpha=0.90, colour="red4", fill="red4",width=0.5) + labs(title= "Possession,Sale of Prohibited Items Suspected", y="count", x="types of possesion,sale of prohibited items suspected") + theme(axis.text.x=element_text(size=3))
# Others:
df_others <- NYPD[NYPD$CRIME_CATEGORIZATION == "Others",]
sum_others <- NYPD %>% filter(CRIME_CATEGORIZATION == "Others") %>% nrow()
print(paste("sum of other crimes: ",sum_others))
## [1] "sum of other crimes: 766"
ggplot(df_others, aes(SUSPECTED_CRIME_DESCRIPTION)) + geom_bar(alpha=0.90, colour="red4", fill="red4",width=0.5) + labs(title= "Other Crimes Suspected", y="count", x="types of crimes")
## Frisk Flag and Search Flag.
## "Search is more intensive than frisk. Frisk is to pat down the suspects to see whether they have weapons, while search is to probe for more evidence, other than weapons."
# Overall probabilities of frisked and searched
probability_frisk <- NYPD %>% select(FRISKED_FLAG) %>% unlist() %>% mean()
print(probability_frisk)
## [1] 0.5922057
probability_search <- NYPD %>% select(SEARCHED_FLAG) %>% unlist() %>% mean()
print(probability_search)
## [1] 0.3332122
# We divide it into 4 categories: both frisked and searched, only frisked, only searched, neither frisked nor searched
# Each suspect can be both frisked and searched
NYPD$FRISK_AND_SEARCH <- vector(mode='character', length(NYPD$FRISKED_FLAG))
for(i in seq_along(NYPD$FRISK_AND_SEARCH)){
if(NYPD$FRISKED_FLAG[i] == "1" & NYPD$SEARCHED_FLAG[i] == "1"){
NYPD$FRISK_AND_SEARCH[i] <- "Frisked and Searched"
}else if (NYPD$FRISKED_FLAG[i] == "1" & NYPD$SEARCHED_FLAG[i] == "0") {
NYPD$FRISK_AND_SEARCH[i] <- "Only Frisked"
}else if (NYPD$FRISKED_FLAG[i] == "0" & NYPD$SEARCHED_FLAG[i] == "1") {
NYPD$FRISK_AND_SEARCH[i] <- "Only Searched"
}else{
NYPD$FRISK_AND_SEARCH[i] <- "Neither Frisked Nor Searched"
}
}
table(NYPD$FRISK_AND_SEARCH)
##
## Frisked and Searched Neither Frisked Nor Searched
## 2623 3444
## Only Frisked Only Searched
## 3896 1045
ggplot(NYPD, aes(FRISK_AND_SEARCH)) + geom_bar(alpha=0.90, colour="mediumpurple3", fill="mediumpurple3",width=0.5) + labs(title= "The Number of Suspects Frisked or Searched", y="count", x="Frisked and Searched")
# Observed time: only frisked VS only searched VS both VS none(excludes large numbers)
ggplot(NYPD, aes(x = FRISK_AND_SEARCH, y = OBSERVED_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 35))
# Observed time: only frisked VS only searched VS both VS none (excludes theoretical outliers)
bound(NYPD$OBSERVED_DURATION_MINUTES)
## 25% 75%
## -0.5 3.5
ggplot(NYPD, aes(x = FRISK_AND_SEARCH, y = OBSERVED_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 3.5))
# Stop time: only frisked VS only searched VS both VS none (excludes large numbers)
ggplot(NYPD, aes(x = FRISK_AND_SEARCH, y = STOP_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 50))
# Stop time: only frisked VS only searched VS both VS none (excludes theoretical outliers)
bound(NYPD$STOP_DURATION_MINUTES)
## 25% 75%
## -10 30
ggplot(NYPD, aes(x = FRISK_AND_SEARCH, y = STOP_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 30))
# Whether police officers are in uniform when stopping suspects.
NYPD[NYPD$OFFICER_IN_UNIFORM_FLAG==0,"OFFICER_IN_UNIFORM_FLAG"] <- "not wearing uniform"
NYPD[NYPD$OFFICER_IN_UNIFORM_FLAG==1,"OFFICER_IN_UNIFORM_FLAG"] <- "wearing uniform"
table(NYPD$OFFICER_IN_UNIFORM_FLAG)
##
## not wearing uniform wearing uniform
## 2868 8140
ggplot(NYPD, aes(OFFICER_IN_UNIFORM_FLAG)) + geom_bar(alpha=0.90, colour="royalblue1", fill="royalblue1",width=0.75) + labs(title="", y="number of officers", x="officer in uniform")
## Suspects Arrested (implies accuracy of stops) $ Accuracy in relation to different factors(sex, race,etc.)
# the number of suspects finally arrested and not arrested
NYPD[NYPD$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "suspect not arrested"
NYPD[NYPD$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "suspect arrested"
table(NYPD$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 3115 7893
ggplot(NYPD, aes(SUSPECT_ARRESTED_FLAG)) + geom_bar(alpha=0.90, colour="royalblue1", fill="royalblue1",width=0.75) + labs(title="", y="number of stops", x="number os arrests")
# accuracy of overall stops
overall_a_acc <- 3115/11018
print(overall_a_acc)
## [1] 0.2827192
## male officers' accuracy vs female officers' accuracy
df_male_officer[df_male_officer$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "male_suspect not arrested"
df_male_officer[df_male_officer$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "male_suspect arrested"
table(df_male_officer$SUSPECT_ARRESTED_FLAG)
##
## male_suspect arrested male_suspect not arrested
## 2639 6612
df_female_officer[df_female_officer$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "female_suspect not arrested"
df_female_officer[df_female_officer$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "female_suspect arrested"
table(df_female_officer$SUSPECT_ARRESTED_FLAG)
##
## female_suspect arrested female_suspect not arrested
## 321 904
male_a_acc <- 2639/(2639+6612)
print(male_a_acc)
## [1] 0.2852665
female_a_acc <- 321/(321+904)
print(female_a_acc)
## [1] 0.2620408
## Observed time in relation to Accuracy
# scatter plot: observed time VS accuracy
ggplot(data=NYPD) + geom_point(mapping = aes(x = OBSERVED_DURATION_MINUTES, y = SUSPECT_ARRESTED_FLAG))
# excludes large numbers
ggplot(data=NYPD) + geom_point(mapping = aes(x = OBSERVED_DURATION_MINUTES, y = SUSPECT_ARRESTED_FLAG)) + coord_cartesian(xlim=c(0, 35))
# excludes theoretical outliers
bound(NYPD$OBSERVED_DURATION_MINUTES)
## 25% 75%
## -0.5 3.5
ggplot(data=NYPD) + geom_point(mapping = aes(x = OBSERVED_DURATION_MINUTES, y = SUSPECT_ARRESTED_FLAG)) + coord_cartesian(xlim=c(0, 3.5))
## Stop time in relation to Accuracy
# scatter plot: stop time VS accuracy
ggplot(data=NYPD) + geom_point(mapping = aes(x = STOP_DURATION_MINUTES, y = SUSPECT_ARRESTED_FLAG))
# excludes large numbers
ggplot(data=NYPD) + geom_point(mapping = aes(x = STOP_DURATION_MINUTES, y = SUSPECT_ARRESTED_FLAG)) + coord_cartesian(xlim=c(0, 50))
# excludes theoretical outliers
bound(NYPD$STOP_DURATION_MINUTES)
## 25% 75%
## -10 30
ggplot(data=NYPD) + geom_point(mapping = aes(x = OBSERVED_DURATION_MINUTES, y = SUSPECT_ARRESTED_FLAG)) + coord_cartesian(xlim=c(0, 30))
## Suspects' Ages in relation to Accuracy
# scatter plot: age VS accuracy
# excludes 0s
ggplot(data=NYPD) + geom_point(mapping = aes(x = SUSPECT_REPORTED_AGE, y = SUSPECT_ARRESTED_FLAG)) + coord_cartesian(xlim=c(1, 90))
# excludes theoretical outliers
bound(NYPD$SUSPECT_REPORTED_AGE)
## 25% 75%
## -7.5 60.5
ggplot(data=NYPD) + geom_point(mapping = aes(x = SUSPECT_REPORTED_AGE, y = SUSPECT_ARRESTED_FLAG)) + coord_cartesian(xlim=c(1, 61))
## Suspects' Sex in relation to Accuracy
# create dataframes on SUSPECT_SEX
df_male_suspect <- NYPD[NYPD$SUSPECT_SEX == "MALE",]
df_female_suspect <- NYPD[NYPD$SUSPECT_SEX == "FEMALE",]
head(df_male_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 1 1 19:04:00 2018 January Monday Based on C/W on Scene
## 2 2 23:00:00 2018 January Monday Based on Radio Run
## 3 3 23:55:00 2018 January Monday Based on Radio Run
## 4 4 3:23:00 2018 January Monday Based on Radio Run
## 5 5 3:23:00 2018 January Monday Based on Radio Run
## 6 6 21:20:00 2018 January Monday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 1 POM 1 SGT
## 2 POM 34 SGT
## 3 POM 808 SGT
## 4 POM 63 SGT
## 5 POM 63 SGT
## 6 POM 71 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 1 1 0
## 2 34 1
## 3 808 0
## 4 63 2
## 5 63 2
## 6 71 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 1 MENACING 18
## 2 CPW 15
## 3 GRAND LARCENY 10
## 4 ROBBERY 15
## 5 ROBBERY 15
## 6 UNAUTHORIZED USE OF A VEHICLE 15
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 1 1 0
## 2 1 0
## 3 1 0
## 4 1 0
## 5 1 0
## 6 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 1 suspect not arrested 0 wearing uniform
## 2 suspect not arrested 0 wearing uniform
## 3 suspect not arrested 0 wearing uniform
## 4 suspect arrested ROBBERY wearing uniform
## 5 suspect arrested ROBBERY wearing uniform
## 6 suspect not arrested 0 wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 1 1 0 0 0
## 2 1 1 0 0
## 3 1 0 0 0
## 4 1 1 0 0
## 5 1 1 0 0
## 6 1 0 1 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG PHYSICAL_FORCE_CEW_FLAG
## 1 0 0 0 0
## 2 0 0 0 0
## 3 0 0 0 0
## 4 0 0 0 0
## 5 0 0 0 0
## 6 0 0 0 0
## PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG
## 1 0 0
## 2 1 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## PHYSICAL_FORCE_OC_SPRAY_USED_FLAG PHYSICAL_FORCE_OTHER_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## PHYSICAL_FORCE_RESTRAINT_USED_FLAG PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 1 0 1
## 2 0 0
## 3 0 1
## 4 1 1
## 5 1 1
## 6 0 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 1 0
## 2 0
## 3 1
## 4 1
## 5 1
## 6 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 1 0
## 2 0
## 3 0
## 4 0
## 5 0
## 6 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 1 0
## 2 0
## 3 0
## 4 0
## 5 0
## 6 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 1 1
## 2 0
## 3 0
## 4 0
## 5 0
## 6 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 1 1 0
## 2 1 0
## 3 1 0
## 4 1 0
## 5 1 0
## 6 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 1
## 5 0 1
## 6 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 1 1 0
## 2 0 0
## 3 1 0
## 4 0 0
## 5 0 0
## 6 1 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 1 0 0
## 2 0 0
## 3 0 0
## 4 0 0
## 5 0 0
## 6 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 1 0 0
## 2 0 1
## 3 0 0
## 4 0 1
## 5 0 1
## 6 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 1 0 COOPERATIVE 0
## 2 0 NERVOUS 26
## 3 0 RELIEVED 40
## 4 0 COMPLAIN 38
## 5 0 COMPLAINT 36
## 6 0 NERVOUS 20
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 1 MALE WHITE 5.1 170
## 2 MALE BLACK HISPANIC 6.1 250
## 3 MALE WHITE HISPANIC 5.5 150
## 4 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.1 160
## 5 MALE WHITE 5.11 230
## 6 MALE BLACK 5.1 150
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 1 MED BRO BLK
## 2 HEA BRO BLK
## 3 THN BRO BLD
## 4 MED BRO BLK
## 5 MED BRO BLK
## 6 THN BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 1 1 VARICK STREET && FRANKLIN STREET
## 2 34 DYCKMAN STREET && POST AVENUE
## 3 43 2245 RANDALL AVENUE
## 4 63 EAST 38 STREET && AVENUE L
## 5 63 EAST 38 STREET && AVENUE L
## 6 67 178 ROCKAWAY PARKWAY
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 1 MANHATTAN Attack and Damage
## 2 MANHATTAN Possession,Sale of Prohibited Items
## 3 BRONX Theft
## 4 BROOKLYN Theft
## 5 BROOKLYN Theft
## 6 BROOKLYN Theft
## FRISK_AND_SEARCH
## 1 Only Frisked
## 2 Frisked and Searched
## 3 Only Frisked
## 4 Frisked and Searched
## 5 Frisked and Searched
## 6 Only Frisked
head(df_female_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2
## 14 14 9:25:00 2018 January Monday
## 49 49 9:15:00 2018 January Tuesday
## 53 53 19:50:00 2018 January Wednesday
## 65 65 13:10:00 2018 January Wednesday
## 66 66 13:10:00 2018 January Wednesday
## 71 71 21:30:00 2018 January Thursday
## STOP_WAS_INITIATED ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE
## 14 Based on C/W on Scene POM 71
## 49 Based on Radio Run POF 48
## 53 Based on Self Initiated POF 807
## 65 Based on Self Initiated POF 94
## 66 Based on Self Initiated POF 94
## 71 Based on Radio Run POM 32
## SUPERVISING_OFFICER_RANK SUPERVISING_OFFICER_COMMAND_CODE
## 14 LT 71
## 49 SGT 48
## 53 SGT 807
## 65 SGT 94
## 66 SGT 94
## 71 SGT 32
## OBSERVED_DURATION_MINUTES SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 14 0 ASSAULT 5
## 49 1 OTHER 8
## 53 10 CRIMINAL TRESPASS 10
## 65 10 CRIMINAL TRESPASS 1
## 66 10 CRIMINAL TRESPASS 1
## 71 1 PETIT LARCENY 5
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 14 1 0
## 49 1 0
## 53 1 0
## 65 1 0
## 66 1 0
## 71 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 14 suspect not arrested 0 wearing uniform
## 49 suspect not arrested 0 wearing uniform
## 53 suspect arrested CRIMINAL TRESPASS wearing uniform
## 65 suspect arrested CRIMINAL TRESPASS not wearing uniform
## 66 suspect arrested CRIMINAL TRESPASS not wearing uniform
## 71 suspect not arrested 0 wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 14 1 0 0 0
## 49 1 0 0 0
## 53 0 1 0 0
## 65 0 0 1 0
## 66 0 0 1 0
## 71 0 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 14 0 0 0
## 49 0 0 0
## 53 0 0 0
## 65 0 0 0
## 66 0 0 0
## 71 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 14 0 0
## 49 0 0
## 53 0 0
## 65 0 0
## 66 0 0
## 71 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 14 0 0
## 49 0 0
## 53 0 0
## 65 1 0
## 66 0 0
## 71 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 14 0 0
## 49 0 0
## 53 0 0
## 65 0 0
## 66 0 0
## 71 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 14 1
## 49 1
## 53 1
## 65 1
## 66 1
## 71 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 14 0
## 49 0
## 53 0
## 65 0
## 66 0
## 71 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 14 0
## 49 0
## 53 0
## 65 0
## 66 0
## 71 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 14 0
## 49 0
## 53 0
## 65 0
## 66 0
## 71 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 14 0
## 49 1
## 53 0
## 65 0
## 66 0
## 71 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 14 0 0
## 49 1 0
## 53 0 0
## 65 0 0
## 66 0 0
## 71 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 14 0 1
## 49 0 0
## 53 0 1
## 65 0 1
## 66 0 1
## 71 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 14 0 0
## 49 1 0
## 53 0 0
## 65 0 0
## 66 0 0
## 71 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 14 0 0
## 49 0 0
## 53 0 0
## 65 0 0
## 66 0 0
## 71 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 14 0 0
## 49 0 0
## 53 0 1
## 65 0 0
## 66 0 0
## 71 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED
## 14 0 UNDERSTANDING WHY SHE WAS STOPPED
## 49 0 CALM
## 53 0 CALM
## 65 0 N/A
## 66 0 N/A
## 71 0 APP NORMAL
## SUSPECT_REPORTED_AGE SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT
## 14 57 FEMALE BLACK 5.3
## 49 24 FEMALE BLACK HISPANIC 5.3
## 53 16 FEMALE BLACK 5.1
## 65 0 FEMALE WHITE HISPANIC 5.4
## 66 18 FEMALE WHITE HISPANIC 5.4
## 71 15 FEMALE BLACK 5.5
## SUSPECT_WEIGHT SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 14 140 THN BRO BLK
## 49 120 THN BLK BLD
## 53 210 HEA BRO BLK
## 65 120 THN BRO BRO
## 66 140 HEA BRO BRO
## 71 120 THN BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 14 71 377 MONTGOMERY STREET
## 49 48 EAST TREMONT AVENUE && ARTHUR AVENUE
## 53 40 515 EAST 143 STREET
## 65 94 417 MORGAN AVENUE
## 66 94 417 MORGAN AVENUE
## 71 32 7 AVENUE && WEST 145 STREET
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 14 BROOKLYN Attack and Damage Only Frisked
## 49 BRONX Others Only Frisked
## 53 BRONX Attack and Damage Only Searched
## 65 BROOKLYN Attack and Damage Neither Frisked Nor Searched
## 66 BROOKLYN Attack and Damage Neither Frisked Nor Searched
## 71 MANHATTAN Theft Neither Frisked Nor Searched
# accuracy on SUSPECT_SEX
df_male_suspect[df_male_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "male_suspect not arrested"
df_male_suspect[df_male_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "male_suspect arrested"
table(df_male_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 2786 7139
df_female_suspect[df_female_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "female_suspect not arrested"
df_female_suspect[df_female_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "female_suspect arrested"
table(df_female_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 311 703
male_a_s_acc <- 2786/(2786+7139)
print(male_a_s_acc)
## [1] 0.2807053
female_a_s_acc <- 311/(311+703)
print(female_a_s_acc)
## [1] 0.3067061
## Suspects' Race in relation to Accuracy
# create dataframes on SUSPECT_RACE_DESCRIPTION
df_AIAN_suspect <- NYPD[NYPD$SUSPECT_RACE_DESCRIPTION == "AMERICAN INDIAN/ALASKAN NATIVE",]
df_WH_suspect <- NYPD[NYPD$SUSPECT_RACE_DESCRIPTION == "WHITE HISPANIC",]
df_BH_suspect <- NYPD[NYPD$SUSPECT_RACE_DESCRIPTION == "BLACK HISPANIC",]
df_API_suspect <- NYPD[NYPD$SUSPECT_RACE_DESCRIPTION == "ASIAN / PACIFIC ISLANDER",]
df_W_suspect <- NYPD[NYPD$SUSPECT_RACE_DESCRIPTION == "WHITE",]
df_B_suspect <- NYPD[NYPD$SUSPECT_RACE_DESCRIPTION == "BLACK",]
df_0_suspect <- NYPD[NYPD$SUSPECT_RACE_DESCRIPTION == "0",]
head(df_AIAN_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2
## 4 4 3:23:00 2018 January Monday
## 960 960 11:00:00 2018 February Thursday
## 1942 1942 17:55:00 2018 March Tuesday
## 2896 2896 19:00:00 2018 April Monday
## 4642 4642 19:35:00 2018 May Sunday
## 5180 5180 22:18:00 2018 June Wednesday
## STOP_WAS_INITIATED ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE
## 4 Based on Radio Run POM 63
## 960 Based on C/W on Scene POM 103
## 1942 Based on Self Initiated POM 804
## 2896 Based on Radio Run SGT 104
## 4642 Based on C/W on Scene POM 45
## 5180 Based on Radio Run POM 106
## SUPERVISING_OFFICER_RANK SUPERVISING_OFFICER_COMMAND_CODE
## 4 SGT 63
## 960 SGT 103
## 1942 SSA 804
## 2896 SGT 104
## 4642 SGT 45
## 5180 SGT 106
## OBSERVED_DURATION_MINUTES SUSPECTED_CRIME_DESCRIPTION
## 4 2 ROBBERY
## 960 0 CPW
## 1942 1 CRIMINAL TRESPASS
## 2896 1 MAKING GRAFFITI
## 4642 1 GRAND LARCENY AUTO
## 5180 1 BURGLARY
## STOP_DURATION_MINUTES OFFICER_EXPLAINED_STOP_FLAG
## 4 15 1
## 960 5 1
## 1942 30 1
## 2896 5 1
## 4642 5 1
## 5180 8 1
## OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION SUSPECT_ARRESTED_FLAG
## 4 0 suspect arrested
## 960 0 suspect not arrested
## 1942 0 suspect not arrested
## 2896 0 suspect arrested
## 4642 0 suspect not arrested
## 5180 0 suspect not arrested
## SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG FRISKED_FLAG SEARCHED_FLAG
## 4 ROBBERY wearing uniform 1 1
## 960 0 wearing uniform 1 0
## 1942 0 wearing uniform 0 0
## 2896 MAKING GRAFFITI wearing uniform 0 1
## 4642 0 wearing uniform 1 0
## 5180 0 not wearing uniform 1 0
## OTHER_CONTRABAND_FLAG FIREARM_FLAG KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG
## 4 0 0 0 0
## 960 0 0 0 0
## 1942 0 0 0 0
## 2896 0 0 0 0
## 4642 0 0 0 0
## 5180 0 0 0 0
## WEAPON_FOUND_FLAG PHYSICAL_FORCE_CEW_FLAG
## 4 0 0
## 960 0 0
## 1942 0 0
## 2896 0 0
## 4642 0 0
## 5180 0 0
## PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 4 0
## 960 0
## 1942 0
## 2896 0
## 4642 0
## 5180 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 4 0 0
## 960 0 0
## 1942 1 0
## 2896 0 0
## 4642 0 0
## 5180 1 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 4 0 1
## 960 0 0
## 1942 0 0
## 2896 0 0
## 4642 0 0
## 5180 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 4 1
## 960 1
## 1942 1
## 2896 1
## 4642 1
## 5180 0
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 4 1
## 960 1
## 1942 0
## 2896 0
## 4642 1
## 5180 1
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 4 0
## 960 0
## 1942 0
## 2896 0
## 4642 0
## 5180 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 4 0
## 960 0
## 1942 0
## 2896 0
## 4642 0
## 5180 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 4 0
## 960 1
## 1942 0
## 2896 0
## 4642 0
## 5180 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 4 1 0
## 960 0 0
## 1942 0 0
## 2896 1 0
## 4642 0 0
## 5180 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 4 0 1
## 960 0 1
## 1942 0 1
## 2896 0 0
## 4642 0 1
## 5180 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 4 0 0
## 960 0 0
## 1942 0 0
## 2896 0 0
## 4642 0 0
## 5180 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 4 0 0
## 960 0 0
## 1942 0 0
## 2896 0 0
## 4642 0 0
## 5180 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 4 0 1
## 960 0 0
## 1942 0 0
## 2896 1 0
## 4642 0 0
## 5180 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 4 0 COMPLAIN 38
## 960 0 CALM/ COOPERATIVE 25
## 1942 0 CALM 28
## 2896 0 NERVOUS 17
## 4642 0 COOPERATIVE 14
## 5180 0 CALM 30
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 4 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.1 160
## 960 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.11 250
## 1942 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.8 200
## 2896 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.6 175
## 4642 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.6 120
## 5180 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.7 155
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 4 MED BRO BLK
## 960 HEA BRO BLK
## 1942 MED BRO BLK
## 2896 MED BRO BLK
## 4642 THN 0 BRO
## 5180 THN BRO BRO
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 4 63 EAST 38 STREET && AVENUE L
## 960 103 90-32 181 STREET
## 1942 7 90 PITT STREET
## 2896 104 RUST STREET && FLUSHING AVENUE
## 4642 45 2499 BUTLER PLACE
## 5180 106 111-58 114 STREET
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 4 BROOKLYN Theft
## 960 QUEENS Possession,Sale of Prohibited Items
## 1942 MANHATTAN Attack and Damage
## 2896 QUEENS Others
## 4642 BRONX Theft
## 5180 QUEENS Theft
## FRISK_AND_SEARCH
## 4 Frisked and Searched
## 960 Only Frisked
## 1942 Neither Frisked Nor Searched
## 2896 Only Searched
## 4642 Only Frisked
## 5180 Only Frisked
head(df_WH_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2
## 3 3 23:55:00 2018 January Monday
## 45 45 18:45:00 2018 January Tuesday
## 47 47 12:34:00 2018 January Tuesday
## 58 58 15:05:00 2018 January Wednesday
## 61 61 2:50:00 2018 January Wednesday
## 65 65 13:10:00 2018 January Wednesday
## STOP_WAS_INITIATED ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE
## 3 Based on Radio Run POM 808
## 45 Based on Self Initiated POM 809
## 47 Based on Radio Run POM 446
## 58 Based on Self Initiated POM 44
## 61 Based on Self Initiated POM 46
## 65 Based on Self Initiated POF 94
## SUPERVISING_OFFICER_RANK SUPERVISING_OFFICER_COMMAND_CODE
## 3 SGT 808
## 45 SGT 809
## 47 SGT 446
## 58 SSA 44
## 61 SGT 46
## 65 SGT 94
## OBSERVED_DURATION_MINUTES SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 3 0 GRAND LARCENY 10
## 45 1 CRIMINAL TRESPASS 3
## 47 1 BURGLARY 37
## 58 1 CPW 2
## 61 2 CPW 3
## 65 10 CRIMINAL TRESPASS 1
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 3 1 0
## 45 1 0
## 47 1 0
## 58 1 0
## 61 1 0
## 65 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 3 suspect not arrested 0 wearing uniform
## 45 suspect arrested CRIMINAL TRESPASS wearing uniform
## 47 suspect arrested BURGLARY wearing uniform
## 58 suspect arrested CPW wearing uniform
## 61 suspect not arrested 0 not wearing uniform
## 65 suspect arrested CRIMINAL TRESPASS not wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 3 1 0 0 0
## 45 0 1 1 0
## 47 1 0 0 0
## 58 1 0 0 0
## 61 1 0 0 0
## 65 0 0 1 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 3 0 0 0
## 45 0 0 0
## 47 0 0 0
## 58 1 0 1
## 61 0 0 0
## 65 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 3 0 0
## 45 0 0
## 47 0 0
## 58 0 0
## 61 0 0
## 65 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 3 0 0
## 45 0 0
## 47 0 0
## 58 0 0
## 61 0 0
## 65 1 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 3 0 0
## 45 0 0
## 47 0 0
## 58 0 0
## 61 0 0
## 65 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 3 1
## 45 1
## 47 1
## 58 1
## 61 1
## 65 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 3 1
## 45 0
## 47 1
## 58 0
## 61 0
## 65 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 3 0
## 45 0
## 47 0
## 58 0
## 61 0
## 65 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 3 0
## 45 0
## 47 0
## 58 0
## 61 0
## 65 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 3 0
## 45 0
## 47 0
## 58 1
## 61 1
## 65 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 3 1 0
## 45 0 0
## 47 1 0
## 58 0 0
## 61 0 0
## 65 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 3 0 0
## 45 0 1
## 47 0 0
## 58 0 0
## 61 0 0
## 65 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 3 1 0
## 45 0 0
## 47 1 0
## 58 0 0
## 61 0 0
## 65 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 3 0 0
## 45 0 0
## 47 0 0
## 58 0 0
## 61 0 0
## 65 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 3 0 0
## 45 1 0
## 47 0 0
## 58 0 0
## 61 0 0
## 65 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 3 0 RELIEVED 40
## 45 0 COOPRATIVE 19
## 47 0 CALM. QUIET. 18
## 58 0 IRATE 42
## 61 0 AGGRESIVE 0
## 65 0 N/A 0
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 3 MALE WHITE HISPANIC 5.5 150
## 45 MALE WHITE HISPANIC 5.9 150
## 47 MALE WHITE HISPANIC 5.1 120
## 58 MALE WHITE HISPANIC 6.1 233
## 61 MALE WHITE HISPANIC 5.6 165
## 65 FEMALE WHITE HISPANIC 5.4 120
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 3 THN BRO BLD
## 45 MED BRO BLK
## 47 THN BRO BRO
## 58 HEA BRO BLK
## 61 MED ZZZ XXX
## 65 THN BRO BRO
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 3 43 2245 RANDALL AVENUE BRONX
## 45 114 3-04 ASTORIA BOULEVARD QUEENS
## 47 121 WILD AVENUE && ROSWELL AVENUE STATEN ISLAND
## 58 44 1505 TOWNSEND AVENUE BRONX
## 61 46 50 WEST BURNSIDE AVENUE BRONX
## 65 94 417 MORGAN AVENUE BROOKLYN
## CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 3 Theft Only Frisked
## 45 Attack and Damage Only Searched
## 47 Theft Only Frisked
## 58 Possession,Sale of Prohibited Items Only Frisked
## 61 Possession,Sale of Prohibited Items Only Frisked
## 65 Attack and Damage Neither Frisked Nor Searched
head(df_BH_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 2 2 23:00:00 2018 January Monday Based on Radio Run
## 24 24 19:35:00 2018 January Monday Based on Radio Run
## 25 25 7:20:00 2018 January Monday Based on Radio Run
## 49 49 9:15:00 2018 January Tuesday Based on Radio Run
## 51 51 0:05:00 2018 January Wednesday Based on C/W on Scene
## 55 55 15:17:00 2018 January Wednesday Based on Radio Run
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 2 POM 34 SGT
## 24 POM 103 SGT
## 25 POM 33 SGT
## 49 POF 48 SGT
## 51 POM 14 SGT
## 55 POF 41 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 2 34 1
## 24 103 1
## 25 33 1
## 49 48 1
## 51 14 2
## 55 41 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 2 CPW 15
## 24 CRIMINAL POSSESSION OF MARIHUANA 5
## 25 ASSAULT 20
## 49 OTHER 8
## 51 PETIT LARCENY 10
## 55 ROBBERY 5
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 2 1 0
## 24 1 0
## 25 1 0
## 49 1 0
## 51 1 0
## 55 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 2 suspect not arrested 0 wearing uniform
## 24 suspect not arrested 0 wearing uniform
## 25 suspect not arrested 0 wearing uniform
## 49 suspect not arrested 0 wearing uniform
## 51 suspect not arrested 0 wearing uniform
## 55 suspect arrested ROBBERY not wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 2 1 1 0 0
## 24 1 0 0 0
## 25 1 0 0 0
## 49 1 0 0 0
## 51 0 0 0 0
## 55 1 1 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 2 0 0 0
## 24 0 0 0
## 25 0 0 0
## 49 0 0 0
## 51 0 0 0
## 55 1 0 1
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 2 0 1
## 24 0 0
## 25 0 0
## 49 0 0
## 51 0 0
## 55 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 2 0 0
## 24 0 0
## 25 1 0
## 49 0 0
## 51 0 0
## 55 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 2 0 0
## 24 0 0
## 25 0 0
## 49 0 0
## 51 0 0
## 55 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 2 0
## 24 1
## 25 1
## 49 1
## 51 1
## 55 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 2 0
## 24 0
## 25 1
## 49 0
## 51 0
## 55 1
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 2 0
## 24 0
## 25 0
## 49 0
## 51 0
## 55 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 2 0
## 24 0
## 25 0
## 49 0
## 51 0
## 55 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 2 0
## 24 0
## 25 0
## 49 1
## 51 0
## 55 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 2 1 0
## 24 1 0
## 25 0 0
## 49 1 0
## 51 1 0
## 55 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 2 0 0
## 24 0 0
## 25 0 1
## 49 0 0
## 51 0 0
## 55 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 2 0 0
## 24 0 0
## 25 0 0
## 49 1 0
## 51 1 0
## 55 1 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 2 0 0
## 24 0 0
## 25 0 0
## 49 0 0
## 51 0 0
## 55 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 2 0 1
## 24 0 0
## 25 0 0
## 49 0 0
## 51 0 0
## 55 1 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 2 0 NERVOUS 26
## 24 0 CALM 25
## 25 0 COOPERATIVE 21
## 49 0 CALM 24
## 51 0 COMPLIANT 27
## 55 0 NERVOUS 18
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 2 MALE BLACK HISPANIC 6.1 250
## 24 MALE BLACK HISPANIC 5.5 260
## 25 MALE BLACK HISPANIC 5.11 170
## 49 FEMALE BLACK HISPANIC 5.3 120
## 51 MALE BLACK HISPANIC 5.1 180
## 55 MALE BLACK HISPANIC 5.6 150
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 2 HEA BRO BLK
## 24 HEA BRO BRO
## 25 THN BRO BLK
## 49 THN BLK BLD
## 51 MED BLK BRO
## 55 THN BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 2 34 DYCKMAN STREET && POST AVENUE
## 24 103 170-06 89 AVENUE
## 25 33 517 WEST 171 STREET
## 49 48 EAST TREMONT AVENUE && ARTHUR AVENUE
## 51 14 WEST 42 STREET && 9 AVENUE
## 55 41 941 FAILE STREET
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 2 MANHATTAN Possession,Sale of Prohibited Items
## 24 QUEENS Possession,Sale of Prohibited Items
## 25 MANHATTAN Attack and Damage
## 49 BRONX Others
## 51 MANHATTAN Theft
## 55 BRONX Theft
## FRISK_AND_SEARCH
## 2 Frisked and Searched
## 24 Only Frisked
## 25 Only Frisked
## 49 Only Frisked
## 51 Neither Frisked Nor Searched
## 55 Frisked and Searched
head(df_API_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 42 42 19:22:00 2018 January Tuesday Based on Radio Run
## 43 43 19:22:00 2018 January Tuesday Based on Radio Run
## 64 64 22:10:00 2018 January Wednesday Based on Radio Run
## 68 68 17:05:00 2018 January Wednesday Based on Radio Run
## 100 100 18:52:00 2018 January Saturday Based on C/W on Scene
## 101 101 15:57:00 2018 January Saturday Based on Radio Run
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 42 POM 106 SGT
## 43 POM 106 SGT
## 64 POM 72 SGT
## 68 POM 111 LT
## 100 POM 40 SGT
## 101 POM 23 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 42 106 1
## 43 106 1
## 64 72 1
## 68 111 1
## 100 881 5
## 101 23 2
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 42 BURGLARY 27
## 43 BURGLARY 27
## 64 ROBBERY 5
## 68 PETIT LARCENY 30
## 100 CPW 5
## 101 ASSAULT 10
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 42 1 0
## 43 1 0
## 64 1 0
## 68 1 0
## 100 1 0
## 101 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 42 suspect not arrested 0 wearing uniform
## 43 suspect not arrested 0 wearing uniform
## 64 suspect not arrested 0 wearing uniform
## 68 suspect not arrested 0 wearing uniform
## 100 suspect not arrested 0 wearing uniform
## 101 suspect arrested ASSAULT not wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 42 1 0 0 0
## 43 1 0 0 0
## 64 1 0 0 0
## 68 1 1 0 0
## 100 0 0 0 0
## 101 1 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 42 0 0 0
## 43 0 0 0
## 64 0 0 0
## 68 0 0 0
## 100 0 0 0
## 101 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 42 0 1
## 43 0 0
## 64 0 0
## 68 0 0
## 100 0 0
## 101 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 42 0 0
## 43 0 0
## 64 0 0
## 68 1 0
## 100 0 0
## 101 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 42 0 0
## 43 0 0
## 64 0 0
## 68 0 0
## 100 0 0
## 101 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 42 1
## 43 1
## 64 1
## 68 1
## 100 1
## 101 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 42 1
## 43 1
## 64 1
## 68 0
## 100 0
## 101 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 42 0
## 43 0
## 64 0
## 68 0
## 100 0
## 101 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 42 0
## 43 0
## 64 0
## 68 0
## 100 0
## 101 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 42 0
## 43 0
## 64 0
## 68 0
## 100 0
## 101 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 42 0 0
## 43 0 0
## 64 1 0
## 68 0 0
## 100 1 0
## 101 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 42 0 1
## 43 0 1
## 64 0 0
## 68 0 1
## 100 0 1
## 101 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 42 1 0
## 43 1 0
## 64 0 0
## 68 0 0
## 100 0 0
## 101 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 42 0 0
## 43 0 0
## 64 0 0
## 68 0 0
## 100 0 0
## 101 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 42 0 1
## 43 0 1
## 64 0 0
## 68 0 1
## 100 0 0
## 101 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 42 0 NERVOUS 37
## 43 0 NERVOUS 55
## 64 0 CALM 21
## 68 0 CASUAL 24
## 100 0 NORMAL 20
## 101 0 ANNOYED 24
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 42 MALE ASIAN / PACIFIC ISLANDER 5.7 150
## 43 MALE ASIAN / PACIFIC ISLANDER 5.11 180
## 64 0 ASIAN / PACIFIC ISLANDER 5.8 160
## 68 MALE ASIAN / PACIFIC ISLANDER 5.8 160
## 100 MALE ASIAN / PACIFIC ISLANDER 5.9 200
## 101 MALE ASIAN / PACIFIC ISLANDER 5.6 150
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 42 MED BRO BLK
## 43 MED BRO BLK
## 64 THN BRO BLK
## 68 MED BRO BLK
## 100 MED BRO BLK
## 101 THN BLK BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 42 106 135 PLACE && 131 AVENUE QUEENS
## 43 106 135 PLACE && 131 AVENUE QUEENS
## 64 72 62 STREET && 7 AVENUE BROOKLYN
## 68 111 255-10 NORTHERN BOULEVARD QUEENS
## 100 18 50 WEST 50 STREET MANHATTAN
## 101 19 EAST 94 STREET && 2 AVENUE MANHATTAN
## CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 42 Theft Only Frisked
## 43 Theft Only Frisked
## 64 Theft Only Frisked
## 68 Theft Frisked and Searched
## 100 Possession,Sale of Prohibited Items Neither Frisked Nor Searched
## 101 Attack and Damage Only Frisked
head(df_W_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 1 1 19:04:00 2018 January Monday Based on C/W on Scene
## 5 5 3:23:00 2018 January Monday Based on Radio Run
## 12 12 1:35:00 2018 January Monday Based on Radio Run
## 13 13 1:35:00 2018 January Monday Based on Radio Run
## 23 23 2:55:00 2018 January Monday Based on Radio Run
## 30 30 1:30:00 2018 January Tuesday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 1 POM 1 SGT
## 5 POM 63 SGT
## 12 POM 68 SGT
## 13 POM 68 SGT
## 23 POM 94 LT
## 30 POM 14 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 1 1 0
## 5 63 2
## 12 68 1
## 13 68 1
## 23 94 1
## 30 14 0
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 1 MENACING 18
## 5 ROBBERY 15
## 12 OTHER 10
## 13 OTHER 10
## 23 PETIT LARCENY 15
## 30 GRAND LARCENY AUTO 5
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 1 1 0
## 5 1 0
## 12 1 0
## 13 1 0
## 23 1 0
## 30 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 1 suspect not arrested 0 wearing uniform
## 5 suspect arrested ROBBERY wearing uniform
## 12 suspect not arrested 0 wearing uniform
## 13 suspect not arrested 0 wearing uniform
## 23 suspect not arrested 0 wearing uniform
## 30 suspect not arrested 0 wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 1 1 0 0 0
## 5 1 1 0 0
## 12 0 0 0 0
## 13 0 0 0 0
## 23 0 0 0 0
## 30 0 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 1 0 0 0
## 5 0 0 0
## 12 0 0 0
## 13 0 0 0
## 23 0 0 0
## 30 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 1 0 0
## 5 0 0
## 12 0 0
## 13 0 0
## 23 0 0
## 30 0 1
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 1 0 0
## 5 0 0
## 12 0 0
## 13 0 0
## 23 0 0
## 30 1 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 1 0 0
## 5 0 1
## 12 0 0
## 13 0 0
## 23 0 0
## 30 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 1 1
## 5 1
## 12 1
## 13 1
## 23 1
## 30 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 1 0
## 5 1
## 12 0
## 13 0
## 23 0
## 30 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 1 0
## 5 0
## 12 0
## 13 0
## 23 0
## 30 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 1 0
## 5 0
## 12 0
## 13 0
## 23 0
## 30 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 1 1
## 5 0
## 12 0
## 13 0
## 23 0
## 30 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 1 1 0
## 5 1 0
## 12 0 0
## 13 0 0
## 23 0 0
## 30 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 1 0 0
## 5 0 1
## 12 1 0
## 13 1 0
## 23 0 0
## 30 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 1 1 0
## 5 0 0
## 12 0 0
## 13 0 0
## 23 1 0
## 30 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 1 0 0
## 5 0 0
## 12 0 0
## 13 0 0
## 23 0 0
## 30 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 1 0 0
## 5 0 1
## 12 0 0
## 13 0 0
## 23 0 0
## 30 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 1 0 COOPERATIVE 0
## 5 0 COMPLAINT 36
## 12 0 CALM 53
## 13 0 CALM 17
## 23 0 NERVOUS 25
## 30 0 CALM 37
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 1 MALE WHITE 5.1 170
## 5 MALE WHITE 5.11 230
## 12 MALE WHITE 5.8 190
## 13 MALE WHITE 5.8 150
## 23 MALE WHITE 5.4 150
## 30 MALE WHITE 5.9 150
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 1 MED BRO BLK
## 5 MED BRO BLK
## 12 XXX BLK BLK
## 13 XXX BRO BLK
## 23 MED GRY BLN
## 30 THN BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 1 1 VARICK STREET && FRANKLIN STREET
## 5 63 EAST 38 STREET && AVENUE L
## 12 68 8924 3 AVENUE
## 13 68 8924 3 AVENUE
## 23 94 44 BERRY STREET
## 30 14 307 5 AVENUE
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 1 MANHATTAN Attack and Damage Only Frisked
## 5 BROOKLYN Theft Frisked and Searched
## 12 BROOKLYN Others Neither Frisked Nor Searched
## 13 BROOKLYN Others Neither Frisked Nor Searched
## 23 BROOKLYN Theft Neither Frisked Nor Searched
## 30 MANHATTAN Theft Neither Frisked Nor Searched
head(df_B_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 6 6 21:20:00 2018 January Monday Based on Self Initiated
## 7 7 0:00:00 2018 January Monday Based on Self Initiated
## 8 8 0:00:00 2018 January Monday Based on Self Initiated
## 9 9 0:00:00 2018 January Monday Based on Self Initiated
## 10 10 0:00:00 2018 January Monday Based on Self Initiated
## 11 11 0:20:00 2018 January Monday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 6 POM 71 SGT
## 7 POM 425 SSA
## 8 POM 425 SSA
## 9 POM 425 SSA
## 10 POM 425 SSA
## 11 DTS 425 LT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 6 71 1
## 7 425 1
## 8 425 1
## 9 425 1
## 10 425 1
## 11 425 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 6 UNAUTHORIZED USE OF A VEHICLE 15
## 7 CPW 10
## 8 CPW 10
## 9 CPW 10
## 10 CPW 10
## 11 CPW 2
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 6 1 0
## 7 1 0
## 8 1 0
## 9 1 0
## 10 1 0
## 11 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 6 suspect not arrested 0 wearing uniform
## 7 suspect arrested CPW wearing uniform
## 8 suspect arrested CPW wearing uniform
## 9 suspect arrested CPW wearing uniform
## 10 suspect arrested CPW wearing uniform
## 11 suspect arrested CPW wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 6 1 0 1 0
## 7 1 1 1 1
## 8 1 1 0 1
## 9 1 1 0 1
## 10 1 1 0 1
## 11 1 0 1 1
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 6 0 0 0
## 7 0 0 1
## 8 0 0 1
## 9 0 0 1
## 10 0 0 1
## 11 0 0 1
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 6 0 0
## 7 0 0
## 8 0 0
## 9 0 0
## 10 0 0
## 11 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 6 0 0
## 7 0 0
## 8 0 0
## 9 0 0
## 10 0 0
## 11 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 6 0 0
## 7 0 0
## 8 0 0
## 9 0 0
## 10 0 0
## 11 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 6 1
## 7 1
## 8 1
## 9 1
## 10 1
## 11 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 6 0
## 7 0
## 8 0
## 9 0
## 10 0
## 11 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 6 0
## 7 0
## 8 0
## 9 0
## 10 0
## 11 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 6 0
## 7 0
## 8 0
## 9 0
## 10 0
## 11 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 6 0
## 7 0
## 8 1
## 9 1
## 10 1
## 11 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 6 1 0
## 7 0 0
## 8 0 0
## 9 0 0
## 10 0 0
## 11 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 6 0 0
## 7 0 1
## 8 0 1
## 9 0 0
## 10 0 0
## 11 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 6 1 0
## 7 0 0
## 8 0 0
## 9 0 0
## 10 0 0
## 11 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 6 0 0
## 7 0 0
## 8 0 0
## 9 0 0
## 10 0 0
## 11 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 6 0 0
## 7 1 0
## 8 1 0
## 9 1 0
## 10 1 0
## 11 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 6 0 NERVOUS 20
## 7 0 N/A 46
## 8 0 N/A 36
## 9 0 N/A 29
## 10 0 N/A 41
## 11 0 CALM 22
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 6 MALE BLACK 5.1 150
## 7 MALE BLACK 5.7 215
## 8 MALE BLACK 5.8 170
## 9 MALE BLACK 6.1 185
## 10 MALE BLACK 6.1 190
## 11 MALE BLACK 6.1 220
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 6 THN BRO BLK
## 7 HEA BRO BLK
## 8 XXX BRO BLK
## 9 XXX BRO BLK
## 10 XXX BRO BLK
## 11 MED BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 6 67 178 ROCKAWAY PARKWAY BROOKLYN
## 7 67 625 EAST 40 STREET BROOKLYN
## 8 67 625 EAST 40 STREET BROOKLYN
## 9 67 625 EAST 40 STREET BROOKLYN
## 10 67 625 EAST 40 STREET BROOKLYN
## 11 67 4410 AVENUE D BROOKLYN
## CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 6 Theft Only Frisked
## 7 Possession,Sale of Prohibited Items Frisked and Searched
## 8 Possession,Sale of Prohibited Items Frisked and Searched
## 9 Possession,Sale of Prohibited Items Frisked and Searched
## 10 Possession,Sale of Prohibited Items Frisked and Searched
## 11 Possession,Sale of Prohibited Items Only Frisked
head(df_0_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2
## 242 242 20:45:00 2018 January Friday
## 391 391 23:30:00 2018 January Wednesday
## 706 706 6:02:00 2018 January Friday
## 786 786 8:29:00 2018 January Sunday
## 1058 1058 18:35:00 2018 February Tuesday
## 1513 1513 19:32:00 2018 February Tuesday
## STOP_WAS_INITIATED ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE
## 242 Based on Self Initiated SGT 40
## 391 Based on Self Initiated POM 425
## 706 Based on C/W on Scene POM 43
## 786 Based on Radio Run POM 40
## 1058 Based on Self Initiated POM 23
## 1513 Based on Self Initiated POM 806
## SUPERVISING_OFFICER_RANK SUPERVISING_OFFICER_COMMAND_CODE
## 242 LT 40
## 391 LSA 425
## 706 SGT 43
## 786 SGT 40
## 1058 SGT 23
## 1513 SGT 806
## OBSERVED_DURATION_MINUTES SUSPECTED_CRIME_DESCRIPTION
## 242 1 CPW
## 391 1 CPW
## 706 0 ROBBERY
## 786 1 CPW
## 1058 1 CRIMINAL POSSESSION OF CONTROLLED SUBSTANCE
## 1513 1 CRIMINAL POSSESSION OF MARIHUANA
## STOP_DURATION_MINUTES OFFICER_EXPLAINED_STOP_FLAG
## 242 10 1
## 391 2 1
## 706 5 1
## 786 4 1
## 1058 5 1
## 1513 8 1
## OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION SUSPECT_ARRESTED_FLAG
## 242 0 suspect arrested
## 391 0 suspect not arrested
## 706 0 suspect arrested
## 786 0 suspect not arrested
## 1058 0 suspect not arrested
## 1513 0 suspect not arrested
## SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG FRISKED_FLAG SEARCHED_FLAG
## 242 CPW not wearing uniform 1 1
## 391 0 not wearing uniform 1 0
## 706 ROBBERY wearing uniform 1 1
## 786 0 wearing uniform 1 0
## 1058 0 wearing uniform 0 0
## 1513 0 wearing uniform 0 0
## OTHER_CONTRABAND_FLAG FIREARM_FLAG KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG
## 242 0 0 1 0
## 391 0 0 0 0
## 706 0 0 0 0
## 786 0 0 0 0
## 1058 0 0 0 0
## 1513 0 0 0 0
## WEAPON_FOUND_FLAG PHYSICAL_FORCE_CEW_FLAG
## 242 1 0
## 391 0 0
## 706 0 0
## 786 0 0
## 1058 0 0
## 1513 0 0
## PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 242 0
## 391 0
## 706 0
## 786 0
## 1058 0
## 1513 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 242 0 0
## 391 0 0
## 706 0 0
## 786 0 0
## 1058 0 0
## 1513 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 242 0 0
## 391 0 0
## 706 0 0
## 786 0 0
## 1058 0 0
## 1513 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 242 1
## 391 1
## 706 1
## 786 1
## 1058 1
## 1513 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 242 0
## 391 0
## 706 1
## 786 0
## 1058 0
## 1513 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 242 0
## 391 1
## 706 0
## 786 0
## 1058 0
## 1513 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 242 0
## 391 0
## 706 0
## 786 0
## 1058 0
## 1513 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 242 1
## 391 1
## 706 0
## 786 0
## 1058 0
## 1513 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 242 0 0
## 391 0 0
## 706 1 0
## 786 1 0
## 1058 0 1
## 1513 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 242 0 0
## 391 0 0
## 706 0 0
## 786 0 0
## 1058 0 0
## 1513 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 242 0 0
## 391 0 0
## 706 0 0
## 786 0 0
## 1058 0 0
## 1513 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 242 0 1
## 391 0 0
## 706 0 0
## 786 0 0
## 1058 0 0
## 1513 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 242 1 0
## 391 0 0
## 706 1 0
## 786 0 0
## 1058 0 0
## 1513 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED
## 242 0 IRATE, UNCOOPERATIVE, USING PROFANE LANGUAGE
## 391 0 NICE
## 706 0 N/A
## 786 0 CALM
## 1058 0 DELIGHTED
## 1513 0 CALMED
## SUSPECT_REPORTED_AGE SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT
## 242 0 MALE 0 null
## 391 22 MALE 0 5.7
## 706 26 MALE 0 5.11
## 786 25 FEMALE 0 5.1
## 1058 47 MALE 0 5.8
## 1513 20 MALE 0 5.1
## SUSPECT_WEIGHT SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR
## 242 null THN BRO
## 391 230 HEA BRO
## 706 null XXX BRO
## 786 110 THN BRO
## 1058 160 MED BRO
## 1513 150 THN BRO
## SUSPECT_HAIR_COLOR STOP_LOCATION_PRECINCT
## 242 BLK 40
## 391 BLK 42
## 706 BLK 43
## 786 BLK 40
## 1058 BLK 23
## 1513 BLK 26
## STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 242 SAINT ANNS AVENUE && EAST 145 STREET BRONX
## 391 EAST 172 STREET && SOUTHERN BOULEVARD BRONX
## 706 1400 SHERIDAN EXPRESSWAY BRONX
## 786 WILLIS AVENUE && EAST 148 STREET BRONX
## 1058 1591 PARK AVENUE MANHATTAN
## 1513 545 WEST 126 STREET MANHATTAN
## CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 242 Possession,Sale of Prohibited Items Frisked and Searched
## 391 Possession,Sale of Prohibited Items Only Frisked
## 706 Theft Frisked and Searched
## 786 Possession,Sale of Prohibited Items Only Frisked
## 1058 Possession,Sale of Prohibited Items Neither Frisked Nor Searched
## 1513 Possession,Sale of Prohibited Items Neither Frisked Nor Searched
# accuracy on SUSPECT_RACE_DESCRIPTION
df_AIAN_suspect[df_AIAN_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "aian_suspect not arrested"
df_AIAN_suspect[df_AIAN_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "aian_suspect arrested"
table(df_AIAN_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 4 12
df_WH_suspect[df_WH_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "wh_suspect not arrested"
df_WH_suspect[df_WH_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "wh_suspect arrested"
table(df_WH_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 783 1628
df_BH_suspect[df_BH_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "bh_suspect not arrested"
df_BH_suspect[df_BH_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "bh_suspect arrested"
table(df_BH_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 252 726
df_API_suspect[df_API_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "api_suspect not arrested"
df_API_suspect[df_API_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "api_suspect arrested"
table(df_API_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 51 170
df_W_suspect[df_W_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "w_suspect not arrested"
df_W_suspect[df_W_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "w_suspect arrested"
table(df_W_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 303 771
df_B_suspect[df_B_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "b_suspect not arrested"
df_B_suspect[df_B_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "b_suspect arrested"
table(df_B_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 1709 4532
df_0_suspect[df_0_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "0_suspect not arrested"
df_0_suspect[df_0_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "0_suspect arrested"
table(df_0_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 13 54
aian_a_s_acc <- 4/(4+12)
print(aian_a_s_acc)
## [1] 0.25
wh_a_s_acc <- 783/(783+1628)
print(wh_a_s_acc)
## [1] 0.3247615
bh_a_s_acc <- 252/(252+726)
print(bh_a_s_acc)
## [1] 0.2576687
api_a_s_acc <- 51/(51+170)
print(api_a_s_acc)
## [1] 0.2307692
w_a_s_acc <- 303/(303+771)
print(w_a_s_acc)
## [1] 0.2821229
b_a_s_acc <- 1709/(1709+4532)
print(b_a_s_acc)
## [1] 0.2738343
zero_a_s_acc <- 13/(13+54)
print(zero_a_s_acc)
## [1] 0.1940299
## Suspects' Heights in relation to Accuracy
# scatter plot: suspect height VS accuracy
ggplot(data=NYPD) + geom_point(mapping = aes(x = SUSPECT_HEIGHT, y = SUSPECT_ARRESTED_FLAG))
## Suspects' Weights in relation to Accuracy
# scatter plot: suspect weight VS accuracy
ggplot(data=NYPD) + geom_point(mapping = aes(x = SUSPECT_WEIGHT, y = SUSPECT_ARRESTED_FLAG))
## Suspects' Body Build Types in relation to Accuracy
# create dataframes on SUSPECT_BODY_BUILD_TYPE
df_01_suspect <- NYPD[NYPD$SUSPECT_BODY_BUILD_TYPE == "0",]
df_HEA_suspect <- NYPD[NYPD$SUSPECT_BODY_BUILD_TYPE == "HEA",]
df_MED_suspect <- NYPD[NYPD$SUSPECT_BODY_BUILD_TYPE == "MED",]
df_THN_suspect <- NYPD[NYPD$SUSPECT_BODY_BUILD_TYPE == "THN",]
df_U_suspect <- NYPD[NYPD$SUSPECT_BODY_BUILD_TYPE == "U",]
df_XXX_suspect <- NYPD[NYPD$SUSPECT_BODY_BUILD_TYPE == "XXX",]
head(df_01_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2
## 335 335 1:45:00 2018 January Monday
## 337 337 1:45:00 2018 January Monday
## 491 491 18:41:00 2018 January Saturday
## 1059 1059 10:52:00 2018 February Tuesday
## 1188 1188 2:50:00 2018 February Saturday
## 1189 1189 2:50:00 2018 February Saturday
## STOP_WAS_INITIATED ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE
## 335 Based on Radio Run POM 44
## 337 Based on Radio Run POF 44
## 491 Based on Radio Run POM 63
## 1059 Based on Radio Run POM 24
## 1188 Based on Self Initiated SGT 52
## 1189 Based on Self Initiated POM 52
## SUPERVISING_OFFICER_RANK SUPERVISING_OFFICER_COMMAND_CODE
## 335 SGT 44
## 337 SGT 44
## 491 LT 63
## 1059 LT 24
## 1188 LT 52
## 1189 SGT 52
## OBSERVED_DURATION_MINUTES SUSPECTED_CRIME_DESCRIPTION
## 335 5 CPW
## 337 5 CPW
## 491 1 ASSAULT
## 1059 0 PETIT LARCENY
## 1188 1 CPW
## 1189 1 OTHER
## STOP_DURATION_MINUTES OFFICER_EXPLAINED_STOP_FLAG
## 335 2 1
## 337 2 1
## 491 5 1
## 1059 1 1
## 1188 5 1
## 1189 5 1
## OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION SUSPECT_ARRESTED_FLAG
## 335 0 suspect not arrested
## 337 0 suspect not arrested
## 491 0 suspect arrested
## 1059 0 suspect arrested
## 1188 0 suspect not arrested
## 1189 0 suspect not arrested
## SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG FRISKED_FLAG SEARCHED_FLAG
## 335 0 wearing uniform 1 0
## 337 0 wearing uniform 1 0
## 491 ASSAULT wearing uniform 0 0
## 1059 PETIT LARCENY wearing uniform 0 0
## 1188 0 not wearing uniform 1 0
## 1189 0 not wearing uniform 1 0
## OTHER_CONTRABAND_FLAG FIREARM_FLAG KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG
## 335 0 0 0 0
## 337 0 0 0 0
## 491 0 0 0 0
## 1059 0 0 0 0
## 1188 0 0 0 0
## 1189 0 0 0 0
## WEAPON_FOUND_FLAG PHYSICAL_FORCE_CEW_FLAG
## 335 0 0
## 337 0 0
## 491 0 0
## 1059 0 0
## 1188 0 0
## 1189 0 0
## PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 335 0
## 337 0
## 491 0
## 1059 0
## 1188 0
## 1189 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 335 0 0
## 337 0 0
## 491 0 0
## 1059 0 0
## 1188 0 0
## 1189 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 335 0 0
## 337 0 0
## 491 0 0
## 1059 0 0
## 1188 0 0
## 1189 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 335 1
## 337 1
## 491 1
## 1059 1
## 1188 1
## 1189 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 335 1
## 337 1
## 491 0
## 1059 0
## 1188 0
## 1189 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 335 0
## 337 0
## 491 0
## 1059 0
## 1188 0
## 1189 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 335 0
## 337 0
## 491 0
## 1059 0
## 1188 0
## 1189 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 335 1
## 337 1
## 491 0
## 1059 0
## 1188 1
## 1189 1
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 335 0 0
## 337 0 0
## 491 1 0
## 1059 1 0
## 1188 0 0
## 1189 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 335 0 0
## 337 0 0
## 491 0 0
## 1059 0 0
## 1188 0 1
## 1189 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 335 0 0
## 337 0 0
## 491 0 0
## 1059 0 0
## 1188 0 0
## 1189 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 335 0 0
## 337 0 0
## 491 0 0
## 1059 0 0
## 1188 0 0
## 1189 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 335 0 0
## 337 0 0
## 491 0 0
## 1059 0 0
## 1188 0 0
## 1189 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 335 0 N/A 18
## 337 0 N/A 19
## 491 0 CALM 0
## 1059 0 NORMAL 27
## 1188 0 NORMAL 0
## 1189 0 NORMAL 0
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 335 MALE BLACK HISPANIC 5.8 120
## 337 MALE WHITE HISPANIC 5.8 160
## 491 MALE BLACK null null
## 1059 MALE WHITE 5.8 150
## 1188 MALE BLACK null null
## 1189 MALE BLACK null null
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 335 0 0 0
## 337 0 BRO BRO
## 491 0 0 0
## 1059 0 0 0
## 1188 0 0 0
## 1189 0 0 0
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 335 44 1310 SHERIDAN AVENUE
## 337 44 1310 SHERIDAN AVENUE
## 491 63 UTICA AVENUE && AVENUE N
## 1059 24 BROADWAY && WEST 95 STREET
## 1188 52 EAST GUN HILL ROAD && DECATUR AVENUE
## 1189 52 EAST GUN HILL ROAD && DECATUR AVENUE
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 335 BRONX Possession,Sale of Prohibited Items
## 337 BRONX Possession,Sale of Prohibited Items
## 491 BROOKLYN Attack and Damage
## 1059 MANHATTAN Theft
## 1188 BRONX Possession,Sale of Prohibited Items
## 1189 BRONX Others
## FRISK_AND_SEARCH
## 335 Only Frisked
## 337 Only Frisked
## 491 Neither Frisked Nor Searched
## 1059 Neither Frisked Nor Searched
## 1188 Only Frisked
## 1189 Only Frisked
head(df_HEA_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2
## 2 2 23:00:00 2018 January Monday
## 7 7 0:00:00 2018 January Monday
## 24 24 19:35:00 2018 January Monday
## 35 35 21:22:00 2018 January Tuesday
## 53 53 19:50:00 2018 January Wednesday
## 57 57 15:00:00 2018 January Wednesday
## STOP_WAS_INITIATED ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE
## 2 Based on Radio Run POM 34
## 7 Based on Self Initiated POM 425
## 24 Based on Radio Run POM 103
## 35 Based on C/W on Scene POM 63
## 53 Based on Self Initiated POF 807
## 57 Based on Radio Run POM 807
## SUPERVISING_OFFICER_RANK SUPERVISING_OFFICER_COMMAND_CODE
## 2 SGT 34
## 7 SSA 425
## 24 SGT 103
## 35 LT 63
## 53 SGT 807
## 57 SGT 807
## OBSERVED_DURATION_MINUTES SUSPECTED_CRIME_DESCRIPTION
## 2 1 CPW
## 7 1 CPW
## 24 1 CRIMINAL POSSESSION OF MARIHUANA
## 35 1 PETIT LARCENY
## 53 10 CRIMINAL TRESPASS
## 57 1 CPW
## STOP_DURATION_MINUTES OFFICER_EXPLAINED_STOP_FLAG
## 2 15 1
## 7 10 1
## 24 5 1
## 35 5 1
## 53 10 1
## 57 4 1
## OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION SUSPECT_ARRESTED_FLAG
## 2 0 suspect not arrested
## 7 0 suspect arrested
## 24 0 suspect not arrested
## 35 0 suspect not arrested
## 53 0 suspect arrested
## 57 0 suspect arrested
## SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG FRISKED_FLAG SEARCHED_FLAG
## 2 0 wearing uniform 1 1
## 7 CPW wearing uniform 1 1
## 24 0 wearing uniform 1 0
## 35 0 wearing uniform 1 0
## 53 CRIMINAL TRESPASS wearing uniform 0 1
## 57 CPW not wearing uniform 1 0
## OTHER_CONTRABAND_FLAG FIREARM_FLAG KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG
## 2 0 0 0 0
## 7 1 1 0 0
## 24 0 0 0 0
## 35 0 0 0 0
## 53 0 0 0 0
## 57 0 1 0 1
## WEAPON_FOUND_FLAG PHYSICAL_FORCE_CEW_FLAG
## 2 0 0
## 7 1 0
## 24 0 0
## 35 0 0
## 53 0 0
## 57 1 0
## PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG
## 2 1 0
## 7 0 0
## 24 0 0
## 35 0 0
## 53 0 0
## 57 0 0
## PHYSICAL_FORCE_OC_SPRAY_USED_FLAG PHYSICAL_FORCE_OTHER_FLAG
## 2 0 0
## 7 0 0
## 24 0 0
## 35 0 0
## 53 0 0
## 57 0 0
## PHYSICAL_FORCE_RESTRAINT_USED_FLAG PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 2 0 0
## 7 0 1
## 24 0 1
## 35 0 1
## 53 0 1
## 57 0 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 2 0
## 7 0
## 24 0
## 35 1
## 53 0
## 57 1
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 2 0
## 7 0
## 24 0
## 35 0
## 53 0
## 57 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 2 0
## 7 0
## 24 0
## 35 0
## 53 0
## 57 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 2 0
## 7 0
## 24 0
## 35 0
## 53 0
## 57 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 2 1 0
## 7 0 0
## 24 1 0
## 35 1 0
## 53 0 0
## 57 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 2 0 0
## 7 0 1
## 24 0 0
## 35 0 0
## 53 0 1
## 57 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 2 0 0
## 7 0 0
## 24 0 0
## 35 1 0
## 53 0 0
## 57 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 2 0 0
## 7 0 0
## 24 0 0
## 35 0 0
## 53 0 0
## 57 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 2 0 1
## 7 1 0
## 24 0 0
## 35 0 0
## 53 0 1
## 57 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 2 0 NERVOUS 26
## 7 0 N/A 46
## 24 0 CALM 25
## 35 0 CALM 23
## 53 0 CALM 16
## 57 0 NERVOUS , SWEATY 21
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 2 MALE BLACK HISPANIC 6.1 250
## 7 MALE BLACK 5.7 215
## 24 MALE BLACK HISPANIC 5.5 260
## 35 MALE BLACK 5.1 220
## 53 FEMALE BLACK 5.1 210
## 57 MALE BLACK 5.9 250
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 2 HEA BRO BLK
## 7 HEA BRO BLK
## 24 HEA BRO BRO
## 35 HEA BRO BLK
## 53 HEA BRO BLK
## 57 HEA BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 2 34 DYCKMAN STREET && POST AVENUE MANHATTAN
## 7 67 625 EAST 40 STREET BROOKLYN
## 24 103 170-06 89 AVENUE QUEENS
## 35 63 1860 FLATBUSH AVENUE BROOKLYN
## 53 40 515 EAST 143 STREET BRONX
## 57 42 735 EAST 165 STREET BRONX
## CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 2 Possession,Sale of Prohibited Items Frisked and Searched
## 7 Possession,Sale of Prohibited Items Frisked and Searched
## 24 Possession,Sale of Prohibited Items Only Frisked
## 35 Theft Only Frisked
## 53 Attack and Damage Only Searched
## 57 Possession,Sale of Prohibited Items Only Frisked
head(df_MED_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 1 1 19:04:00 2018 January Monday Based on C/W on Scene
## 4 4 3:23:00 2018 January Monday Based on Radio Run
## 5 5 3:23:00 2018 January Monday Based on Radio Run
## 11 11 0:20:00 2018 January Monday Based on Self Initiated
## 15 15 8:38:00 2018 January Monday Based on Radio Run
## 23 23 2:55:00 2018 January Monday Based on Radio Run
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 1 POM 1 SGT
## 4 POM 63 SGT
## 5 POM 63 SGT
## 11 DTS 425 LT
## 15 POM 73 SGT
## 23 POM 94 LT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 1 1 0
## 4 63 2
## 5 63 2
## 11 425 1
## 15 73 1
## 23 94 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 1 MENACING 18
## 4 ROBBERY 15
## 5 ROBBERY 15
## 11 CPW 2
## 15 ASSAULT 1
## 23 PETIT LARCENY 15
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 1 1 0
## 4 1 0
## 5 1 0
## 11 1 0
## 15 1 0
## 23 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 1 suspect not arrested 0 wearing uniform
## 4 suspect arrested ROBBERY wearing uniform
## 5 suspect arrested ROBBERY wearing uniform
## 11 suspect arrested CPW wearing uniform
## 15 suspect not arrested 0 wearing uniform
## 23 suspect not arrested 0 wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 1 1 0 0 0
## 4 1 1 0 0
## 5 1 1 0 0
## 11 1 0 1 1
## 15 0 0 0 0
## 23 0 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 1 0 0 0
## 4 0 0 0
## 5 0 0 0
## 11 0 0 1
## 15 0 0 0
## 23 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 1 0 0
## 4 0 0
## 5 0 0
## 11 0 0
## 15 0 0
## 23 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 1 0 0
## 4 0 0
## 5 0 0
## 11 0 0
## 15 0 0
## 23 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 1 0 0
## 4 0 1
## 5 0 1
## 11 0 0
## 15 1 0
## 23 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 1 1
## 4 1
## 5 1
## 11 1
## 15 1
## 23 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 1 0
## 4 1
## 5 1
## 11 0
## 15 0
## 23 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 1 0
## 4 0
## 5 0
## 11 0
## 15 0
## 23 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 1 0
## 4 0
## 5 0
## 11 0
## 15 0
## 23 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 1 1
## 4 0
## 5 0
## 11 0
## 15 0
## 23 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 1 1 0
## 4 1 0
## 5 1 0
## 11 0 0
## 15 1 0
## 23 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 1 0 0
## 4 0 1
## 5 0 1
## 11 0 1
## 15 0 0
## 23 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 1 1 0
## 4 0 0
## 5 0 0
## 11 0 0
## 15 0 0
## 23 1 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 1 0 0
## 4 0 0
## 5 0 0
## 11 0 0
## 15 0 0
## 23 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 1 0 0
## 4 0 1
## 5 0 1
## 11 0 0
## 15 0 0
## 23 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 1 0 COOPERATIVE 0
## 4 0 COMPLAIN 38
## 5 0 COMPLAINT 36
## 11 0 CALM 22
## 15 0 NORMAL 0
## 23 0 NERVOUS 25
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 1 MALE WHITE 5.1 170
## 4 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.1 160
## 5 MALE WHITE 5.11 230
## 11 MALE BLACK 6.1 220
## 15 MALE BLACK 5.9 190
## 23 MALE WHITE 5.4 150
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 1 MED BRO BLK
## 4 MED BRO BLK
## 5 MED BRO BLK
## 11 MED BRO BLK
## 15 MED BRO XXX
## 23 MED GRY BLN
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 1 1 VARICK STREET && FRANKLIN STREET
## 4 63 EAST 38 STREET && AVENUE L
## 5 63 EAST 38 STREET && AVENUE L
## 11 67 4410 AVENUE D
## 15 73 EAST 98 STREET && SUTTER AVENUE
## 23 94 44 BERRY STREET
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 1 MANHATTAN Attack and Damage
## 4 BROOKLYN Theft
## 5 BROOKLYN Theft
## 11 BROOKLYN Possession,Sale of Prohibited Items
## 15 BROOKLYN Attack and Damage
## 23 BROOKLYN Theft
## FRISK_AND_SEARCH
## 1 Only Frisked
## 4 Frisked and Searched
## 5 Frisked and Searched
## 11 Only Frisked
## 15 Neither Frisked Nor Searched
## 23 Neither Frisked Nor Searched
head(df_THN_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 3 3 23:55:00 2018 January Monday Based on Radio Run
## 6 6 21:20:00 2018 January Monday Based on Self Initiated
## 14 14 9:25:00 2018 January Monday Based on C/W on Scene
## 16 16 0:45:00 2018 January Monday Based on Self Initiated
## 17 17 0:45:00 2018 January Monday Based on Self Initiated
## 18 18 0:45:00 2018 January Monday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 3 POM 808 SGT
## 6 POM 71 SGT
## 14 POM 71 LT
## 16 POF 802 SGT
## 17 POF 802 SGT
## 18 POF 802 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 3 808 0
## 6 71 1
## 14 71 0
## 16 802 1
## 17 802 1
## 18 802 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 3 GRAND LARCENY 10
## 6 UNAUTHORIZED USE OF A VEHICLE 15
## 14 ASSAULT 5
## 16 CPW 5
## 17 CPW 5
## 18 CPW 5
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 3 1 0
## 6 1 0
## 14 1 0
## 16 1 0
## 17 1 0
## 18 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 3 suspect not arrested 0 wearing uniform
## 6 suspect not arrested 0 wearing uniform
## 14 suspect not arrested 0 wearing uniform
## 16 suspect not arrested 0 wearing uniform
## 17 suspect not arrested 0 wearing uniform
## 18 suspect not arrested 0 wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 3 1 0 0 0
## 6 1 0 1 0
## 14 1 0 0 0
## 16 1 0 0 0
## 17 1 0 0 0
## 18 1 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 3 0 0 0
## 6 0 0 0
## 14 0 0 0
## 16 0 0 0
## 17 0 0 0
## 18 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 3 0 0
## 6 0 0
## 14 0 0
## 16 0 0
## 17 0 0
## 18 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 3 0 0
## 6 0 0
## 14 0 0
## 16 0 0
## 17 0 0
## 18 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 3 0 0
## 6 0 0
## 14 0 0
## 16 0 0
## 17 0 0
## 18 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 3 1
## 6 1
## 14 1
## 16 1
## 17 1
## 18 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 3 1
## 6 0
## 14 0
## 16 1
## 17 1
## 18 1
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 3 0
## 6 0
## 14 0
## 16 1
## 17 0
## 18 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 3 0
## 6 0
## 14 0
## 16 1
## 17 0
## 18 1
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 3 0
## 6 0
## 14 0
## 16 1
## 17 1
## 18 1
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 3 1 0
## 6 1 0
## 14 0 0
## 16 0 0
## 17 0 0
## 18 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 3 0 0
## 6 0 0
## 14 0 1
## 16 0 1
## 17 0 1
## 18 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 3 1 0
## 6 1 0
## 14 0 0
## 16 0 0
## 17 0 0
## 18 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 3 0 0
## 6 0 0
## 14 0 0
## 16 0 0
## 17 0 0
## 18 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 3 0 0
## 6 0 0
## 14 0 0
## 16 0 0
## 17 0 0
## 18 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED
## 3 0 RELIEVED
## 6 0 NERVOUS
## 14 0 UNDERSTANDING WHY SHE WAS STOPPED
## 16 0 N/A
## 17 0 N/A
## 18 0 N/A
## SUSPECT_REPORTED_AGE SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT
## 3 40 MALE WHITE HISPANIC 5.5
## 6 20 MALE BLACK 5.1
## 14 57 FEMALE BLACK 5.3
## 16 18 MALE BLACK 5.5
## 17 0 MALE BLACK 5.1
## 18 0 MALE BLACK 5.6
## SUSPECT_WEIGHT SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 3 150 THN BRO BLD
## 6 150 THN BRO BLK
## 14 140 THN BRO BLK
## 16 140 THN BRO BLK
## 17 120 THN BRO BLK
## 18 160 THN BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 3 43 2245 RANDALL AVENUE BRONX
## 6 67 178 ROCKAWAY PARKWAY BROOKLYN
## 14 71 377 MONTGOMERY STREET BROOKLYN
## 16 73 131 BELMONT AVENUE BROOKLYN
## 17 73 131 BELMONT AVENUE BROOKLYN
## 18 73 131 BELMONT AVENUE BROOKLYN
## CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 3 Theft Only Frisked
## 6 Theft Only Frisked
## 14 Attack and Damage Only Frisked
## 16 Possession,Sale of Prohibited Items Only Frisked
## 17 Possession,Sale of Prohibited Items Only Frisked
## 18 Possession,Sale of Prohibited Items Only Frisked
head(df_U_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2
## 199 199 13:50:00 2018 January Thursday
## 200 200 15:43:00 2018 January Thursday
## 209 209 23:53:00 2018 January Thursday
## 317 317 1:48:00 2018 January Sunday
## 433 433 10:25:00 2018 January Friday
## 435 435 22:10:00 2018 January Friday
## STOP_WAS_INITIATED ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE
## 199 Based on Self Initiated POM 863
## 200 Based on Radio Run POM 19
## 209 Based on Self Initiated POM 808
## 317 Based on Self Initiated POM 68
## 433 Based on Self Initiated POM 863
## 435 Based on Radio Run POM 24
## SUPERVISING_OFFICER_RANK SUPERVISING_OFFICER_COMMAND_CODE
## 199 SGT 863
## 200 SGT 19
## 209 SGT 808
## 317 LT 68
## 433 SGT 863
## 435 SGT 24
## OBSERVED_DURATION_MINUTES SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 199 1 CPW 5
## 200 1 ROBBERY 18
## 209 3 CPW 0
## 317 3 BURGLARY 7
## 433 1 CPW 5
## 435 1 PETIT LARCENY 5
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 199 1 0
## 200 1 0
## 209 1 0
## 317 1 0
## 433 1 0
## 435 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 199 suspect arrested CPW wearing uniform
## 200 suspect arrested ROBBERY wearing uniform
## 209 suspect arrested CPW not wearing uniform
## 317 suspect not arrested 0 wearing uniform
## 433 suspect arrested CPW wearing uniform
## 435 suspect arrested PETIT LARCENY wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 199 1 1 0 0
## 200 1 1 0 0
## 209 1 1 0 1
## 317 0 0 0 0
## 433 1 1 1 0
## 435 1 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 199 1 0 1
## 200 0 0 0
## 209 0 0 1
## 317 0 0 0
## 433 1 0 1
## 435 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 199 0 0
## 200 0 0
## 209 0 0
## 317 0 0
## 433 0 0
## 435 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 199 0 0
## 200 1 0
## 209 0 0
## 317 0 0
## 433 0 0
## 435 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 199 0 0
## 200 0 0
## 209 0 1
## 317 0 0
## 433 0 0
## 435 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 199 1
## 200 1
## 209 1
## 317 1
## 433 1
## 435 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 199 0
## 200 1
## 209 0
## 317 0
## 433 0
## 435 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 199 0
## 200 0
## 209 1
## 317 0
## 433 0
## 435 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 199 0
## 200 0
## 209 0
## 317 1
## 433 0
## 435 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 199 1
## 200 0
## 209 1
## 317 0
## 433 1
## 435 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 199 0 0
## 200 1 0
## 209 0 0
## 317 0 0
## 433 0 0
## 435 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 199 0 0
## 200 0 0
## 209 0 0
## 317 1 0
## 433 0 0
## 435 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 199 0 1
## 200 0 0
## 209 0 0
## 317 0 0
## 433 0 1
## 435 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 199 1 1
## 200 0 0
## 209 0 0
## 317 0 0
## 433 1 1
## 435 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 199 1 0
## 200 1 0
## 209 1 0
## 317 0 0
## 433 1 0
## 435 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 199 0 EASY GOING 50
## 200 0 ANXIOUS 20
## 209 0 NERVOUS 19
## 317 0 UNDERSTANDING/COOPERTIVE 41
## 433 0 NERVOUS 31
## 435 0 NERVOUS 47
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 199 MALE WHITE 5.7 185
## 200 MALE BLACK 6.5 220
## 209 MALE BLACK 5.8 165
## 317 MALE BLACK 5.1 190
## 433 MALE WHITE HISPANIC 6.2 195
## 435 MALE BLACK 6.3 220
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 199 U BRO BRO
## 200 U BRO BLK
## 209 U BRO BLK
## 317 U BRO BLK
## 433 U BRO BLK
## 435 U BRO BLD
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 199 13 UNION SQUARE WEST && EAST 14 STREET
## 200 19 3 AVENUE && EAST 90 STREET
## 209 43 WESTCHESTER AVENUE && EVERGREEN AVENUE
## 317 68 13 AVENUE && 76 STREET
## 433 13 UNION SQUARE WEST && EAST 14 STREET
## 435 24 382 CENTRAL PARK WEST
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 199 MANHATTAN Possession,Sale of Prohibited Items
## 200 MANHATTAN Theft
## 209 BRONX Possession,Sale of Prohibited Items
## 317 BROOKLYN Theft
## 433 MANHATTAN Possession,Sale of Prohibited Items
## 435 MANHATTAN Theft
## FRISK_AND_SEARCH
## 199 Frisked and Searched
## 200 Frisked and Searched
## 209 Frisked and Searched
## 317 Neither Frisked Nor Searched
## 433 Frisked and Searched
## 435 Only Frisked
head(df_XXX_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2
## 8 8 0:00:00 2018 January Monday
## 9 9 0:00:00 2018 January Monday
## 10 10 0:00:00 2018 January Monday
## 12 12 1:35:00 2018 January Monday
## 13 13 1:35:00 2018 January Monday
## 212 212 22:24:00 2018 January Thursday
## STOP_WAS_INITIATED ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE
## 8 Based on Self Initiated POM 425
## 9 Based on Self Initiated POM 425
## 10 Based on Self Initiated POM 425
## 12 Based on Radio Run POM 68
## 13 Based on Radio Run POM 68
## 212 Based on C/W on Scene POM 49
## SUPERVISING_OFFICER_RANK SUPERVISING_OFFICER_COMMAND_CODE
## 8 SSA 425
## 9 SSA 425
## 10 SSA 425
## 12 SGT 68
## 13 SGT 68
## 212 SGT 49
## OBSERVED_DURATION_MINUTES SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 8 1 CPW 10
## 9 1 CPW 10
## 10 1 CPW 10
## 12 1 OTHER 10
## 13 1 OTHER 10
## 212 1 ROBBERY 3
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 8 1 0
## 9 1 0
## 10 1 0
## 12 1 0
## 13 1 0
## 212 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 8 suspect arrested CPW wearing uniform
## 9 suspect arrested CPW wearing uniform
## 10 suspect arrested CPW wearing uniform
## 12 suspect not arrested 0 wearing uniform
## 13 suspect not arrested 0 wearing uniform
## 212 suspect arrested ROBBERY wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 8 1 1 0 1
## 9 1 1 0 1
## 10 1 1 0 1
## 12 0 0 0 0
## 13 0 0 0 0
## 212 1 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 8 0 0 1
## 9 0 0 1
## 10 0 0 1
## 12 0 0 0
## 13 0 0 0
## 212 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 8 0 0
## 9 0 0
## 10 0 0
## 12 0 0
## 13 0 0
## 212 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 8 0 0
## 9 0 0
## 10 0 0
## 12 0 0
## 13 0 0
## 212 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 8 0 0
## 9 0 0
## 10 0 0
## 12 0 0
## 13 0 0
## 212 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 8 1
## 9 1
## 10 1
## 12 1
## 13 1
## 212 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 8 0
## 9 0
## 10 0
## 12 0
## 13 0
## 212 1
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 8 0
## 9 0
## 10 0
## 12 0
## 13 0
## 212 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 8 0
## 9 0
## 10 0
## 12 0
## 13 0
## 212 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 8 1
## 9 1
## 10 1
## 12 0
## 13 0
## 212 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 8 0 0
## 9 0 0
## 10 0 0
## 12 0 0
## 13 0 0
## 212 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 8 0 1
## 9 0 0
## 10 0 0
## 12 1 0
## 13 1 0
## 212 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 8 0 0
## 9 0 0
## 10 0 0
## 12 0 0
## 13 0 0
## 212 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 8 0 0
## 9 0 0
## 10 0 0
## 12 0 0
## 13 0 0
## 212 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 8 1 0
## 9 1 0
## 10 1 0
## 12 0 0
## 13 0 0
## 212 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 8 0 N/A 36
## 9 0 N/A 29
## 10 0 N/A 41
## 12 0 CALM 53
## 13 0 CALM 17
## 212 0 CALMED 25
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 8 MALE BLACK 5.8 170
## 9 MALE BLACK 6.1 185
## 10 MALE BLACK 6.1 190
## 12 MALE WHITE 5.8 190
## 13 MALE WHITE 5.8 150
## 212 MALE BLACK 5.9 180
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 8 XXX BRO BLK
## 9 XXX BRO BLK
## 10 XXX BRO BLK
## 12 XXX BLK BLK
## 13 XXX BRO BLK
## 212 XXX BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 8 67 625 EAST 40 STREET BROOKLYN
## 9 67 625 EAST 40 STREET BROOKLYN
## 10 67 625 EAST 40 STREET BROOKLYN
## 12 68 8924 3 AVENUE BROOKLYN
## 13 68 8924 3 AVENUE BROOKLYN
## 212 49 1940 WALLACE AVENUE BRONX
## CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 8 Possession,Sale of Prohibited Items Frisked and Searched
## 9 Possession,Sale of Prohibited Items Frisked and Searched
## 10 Possession,Sale of Prohibited Items Frisked and Searched
## 12 Others Neither Frisked Nor Searched
## 13 Others Neither Frisked Nor Searched
## 212 Theft Only Frisked
# accuracy on SUSPECT_BODY_BUILD_TYPE
df_01_suspect[df_01_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "01_suspect not arrested"
df_01_suspect[df_01_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "01_suspect arrested"
table(df_01_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 22 126
df_HEA_suspect[df_HEA_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "hea_suspect not arrested"
df_HEA_suspect[df_HEA_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "hea_suspect arrested"
table(df_HEA_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 299 757
df_MED_suspect[df_MED_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "med_suspect not arrested"
df_MED_suspect[df_MED_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "med_suspect arrested"
table(df_MED_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 1098 3009
df_THN_suspect[df_THN_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "thn_suspect not arrested"
df_THN_suspect[df_THN_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "thn_suspect arrested"
table(df_THN_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 1580 3738
df_U_suspect[df_U_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "u_suspect not arrested"
df_U_suspect[df_U_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "u_suspect arrested"
table(df_U_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 105 226
df_XXX_suspect[df_XXX_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "xxx_suspect not arrested"
df_XXX_suspect[df_XXX_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "xxx_suspect arrested"
table(df_XXX_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 11 37
zero1_a_s_acc <- 22/(22+126)
print(zero1_a_s_acc)
## [1] 0.1486486
hea_a_s_acc <- 299/(299+757)
print(hea_a_s_acc)
## [1] 0.2831439
med_a_s_acc <- 1098/(1098+3009)
print(med_a_s_acc)
## [1] 0.2673484
thn_a_s_acc <- 1580/(1580+3738)
print(thn_a_s_acc)
## [1] 0.2971042
u_a_s_acc <- 105/(105+226)
print(u_a_s_acc)
## [1] 0.3172205
xxx_a_s_acc <- 11/(11+37)
print(xxx_a_s_acc)
## [1] 0.2291667
## Suspects' Stopped Borough in relation to Accuracy
# create dataframe on STOP_LOCATION_BORO_NAME
df_BRONX_suspect <- NYPD[NYPD$STOP_LOCATION_BORO_NAME == "BRONX",]
df_BROOKLYN_suspect <- NYPD[NYPD$STOP_LOCATION_BORO_NAME == "BROOKLYN",]
df_MANHATTAN_suspect <- NYPD[NYPD$STOP_LOCATION_BORO_NAME == "MANHATTAN",]
df_QUEENS_suspect <- NYPD[NYPD$STOP_LOCATION_BORO_NAME == "QUEENS",]
df_SI_suspect <- NYPD[NYPD$STOP_LOCATION_BORO_NAME == "STATEN ISLAND",]
head(df_BRONX_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 3 3 23:55:00 2018 January Monday Based on Radio Run
## 26 26 17:40:00 2018 January Monday Based on Self Initiated
## 32 32 19:20:00 2018 January Tuesday Based on Radio Run
## 33 33 22:30:00 2018 January Tuesday Based on Self Initiated
## 34 34 15:14:00 2018 January Tuesday Based on Self Initiated
## 49 49 9:15:00 2018 January Tuesday Based on Radio Run
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 3 POM 808 SGT
## 26 POM 52 SGT
## 32 POM 807 SGT
## 33 POM 807 SGT
## 34 POM 49 SGT
## 49 POF 48 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 3 808 0
## 26 52 3
## 32 807 1
## 33 807 1
## 34 49 1
## 49 48 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 3 GRAND LARCENY 10
## 26 CPW 12
## 32 OTHER 3
## 33 CRIMINAL TRESPASS 5
## 34 CPW 5
## 49 OTHER 8
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 3 1 0
## 26 1 0
## 32 1 0
## 33 1 0
## 34 1 0
## 49 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 3 suspect not arrested 0 wearing uniform
## 26 suspect not arrested 0 not wearing uniform
## 32 suspect not arrested 0 wearing uniform
## 33 suspect arrested CRIMINAL TRESPASS wearing uniform
## 34 suspect arrested CPW not wearing uniform
## 49 suspect not arrested 0 wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 3 1 0 0 0
## 26 1 1 1 1
## 32 1 0 0 0
## 33 0 1 0 0
## 34 1 1 0 0
## 49 1 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 3 0 0 0
## 26 0 0 1
## 32 0 0 0
## 33 0 0 0
## 34 1 0 1
## 49 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 3 0 0
## 26 0 0
## 32 0 0
## 33 0 0
## 34 0 0
## 49 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 3 0 0
## 26 0 0
## 32 0 0
## 33 0 0
## 34 1 0
## 49 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 3 0 0
## 26 0 0
## 32 0 0
## 33 0 0
## 34 0 0
## 49 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 3 1
## 26 1
## 32 1
## 33 1
## 34 1
## 49 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 3 1
## 26 0
## 32 0
## 33 0
## 34 0
## 49 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 3 0
## 26 0
## 32 0
## 33 0
## 34 0
## 49 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 3 0
## 26 0
## 32 0
## 33 0
## 34 0
## 49 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 3 0
## 26 1
## 32 1
## 33 0
## 34 1
## 49 1
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 3 1 0
## 26 0 0
## 32 1 0
## 33 0 0
## 34 0 0
## 49 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 3 0 0
## 26 0 0
## 32 0 0
## 33 0 1
## 34 0 0
## 49 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 3 1 0
## 26 0 0
## 32 0 0
## 33 0 0
## 34 0 0
## 49 1 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 3 0 0
## 26 0 1
## 32 0 0
## 33 0 0
## 34 0 1
## 49 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 3 0 0
## 26 0 0
## 32 0 0
## 33 1 0
## 34 1 0
## 49 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 3 0 RELIEVED 40
## 26 0 CALM 18
## 32 0 COMPLIANT 38
## 33 0 CALM 43
## 34 0 CALM 34
## 49 0 CALM 24
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 3 MALE WHITE HISPANIC 5.5 150
## 26 MALE BLACK 5.7 140
## 32 MALE WHITE 5.9 175
## 33 MALE BLACK 5.5 130
## 34 MALE WHITE 5.8 145
## 49 FEMALE BLACK HISPANIC 5.3 120
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 3 THN BRO BLD
## 26 THN BRO BLK
## 32 MED BRO XXX
## 33 THN BRO BLK
## 34 THN HAZ BLN
## 49 THN BLK BLD
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 3 43 2245 RANDALL AVENUE
## 26 52 EAST FORDHAM ROAD && BAINBRIDGE AVENUE
## 32 40 340 ALEXANDER AVENUE
## 33 40 383 EAST 141 STREET
## 34 49 2142 WHITE PLAINS ROAD
## 49 48 EAST TREMONT AVENUE && ARTHUR AVENUE
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 3 BRONX Theft
## 26 BRONX Possession,Sale of Prohibited Items
## 32 BRONX Others
## 33 BRONX Attack and Damage
## 34 BRONX Possession,Sale of Prohibited Items
## 49 BRONX Others
## FRISK_AND_SEARCH
## 3 Only Frisked
## 26 Frisked and Searched
## 32 Only Frisked
## 33 Only Searched
## 34 Frisked and Searched
## 49 Only Frisked
head(df_BROOKLYN_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 4 4 3:23:00 2018 January Monday Based on Radio Run
## 5 5 3:23:00 2018 January Monday Based on Radio Run
## 6 6 21:20:00 2018 January Monday Based on Self Initiated
## 7 7 0:00:00 2018 January Monday Based on Self Initiated
## 8 8 0:00:00 2018 January Monday Based on Self Initiated
## 9 9 0:00:00 2018 January Monday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 4 POM 63 SGT
## 5 POM 63 SGT
## 6 POM 71 SGT
## 7 POM 425 SSA
## 8 POM 425 SSA
## 9 POM 425 SSA
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 4 63 2
## 5 63 2
## 6 71 1
## 7 425 1
## 8 425 1
## 9 425 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 4 ROBBERY 15
## 5 ROBBERY 15
## 6 UNAUTHORIZED USE OF A VEHICLE 15
## 7 CPW 10
## 8 CPW 10
## 9 CPW 10
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 4 1 0
## 5 1 0
## 6 1 0
## 7 1 0
## 8 1 0
## 9 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 4 suspect arrested ROBBERY wearing uniform
## 5 suspect arrested ROBBERY wearing uniform
## 6 suspect not arrested 0 wearing uniform
## 7 suspect arrested CPW wearing uniform
## 8 suspect arrested CPW wearing uniform
## 9 suspect arrested CPW wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 4 1 1 0 0
## 5 1 1 0 0
## 6 1 0 1 0
## 7 1 1 1 1
## 8 1 1 0 1
## 9 1 1 0 1
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG PHYSICAL_FORCE_CEW_FLAG
## 4 0 0 0 0
## 5 0 0 0 0
## 6 0 0 0 0
## 7 0 0 1 0
## 8 0 0 1 0
## 9 0 0 1 0
## PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG
## 4 0 0
## 5 0 0
## 6 0 0
## 7 0 0
## 8 0 0
## 9 0 0
## PHYSICAL_FORCE_OC_SPRAY_USED_FLAG PHYSICAL_FORCE_OTHER_FLAG
## 4 0 0
## 5 0 0
## 6 0 0
## 7 0 0
## 8 0 0
## 9 0 0
## PHYSICAL_FORCE_RESTRAINT_USED_FLAG PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 4 1 1
## 5 1 1
## 6 0 1
## 7 0 1
## 8 0 1
## 9 0 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 4 1
## 5 1
## 6 0
## 7 0
## 8 0
## 9 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 4 0
## 5 0
## 6 0
## 7 0
## 8 0
## 9 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 4 0
## 5 0
## 6 0
## 7 0
## 8 0
## 9 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 4 0
## 5 0
## 6 0
## 7 0
## 8 1
## 9 1
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 4 1 0
## 5 1 0
## 6 1 0
## 7 0 0
## 8 0 0
## 9 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 4 0 1
## 5 0 1
## 6 0 0
## 7 0 1
## 8 0 1
## 9 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 4 0 0
## 5 0 0
## 6 1 0
## 7 0 0
## 8 0 0
## 9 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 4 0 0
## 5 0 0
## 6 0 0
## 7 0 0
## 8 0 0
## 9 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 4 0 1
## 5 0 1
## 6 0 0
## 7 1 0
## 8 1 0
## 9 1 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 4 0 COMPLAIN 38
## 5 0 COMPLAINT 36
## 6 0 NERVOUS 20
## 7 0 N/A 46
## 8 0 N/A 36
## 9 0 N/A 29
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 4 MALE AMERICAN INDIAN/ALASKAN NATIVE 5.1 160
## 5 MALE WHITE 5.11 230
## 6 MALE BLACK 5.1 150
## 7 MALE BLACK 5.7 215
## 8 MALE BLACK 5.8 170
## 9 MALE BLACK 6.1 185
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 4 MED BRO BLK
## 5 MED BRO BLK
## 6 THN BRO BLK
## 7 HEA BRO BLK
## 8 XXX BRO BLK
## 9 XXX BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS STOP_LOCATION_BORO_NAME
## 4 63 EAST 38 STREET && AVENUE L BROOKLYN
## 5 63 EAST 38 STREET && AVENUE L BROOKLYN
## 6 67 178 ROCKAWAY PARKWAY BROOKLYN
## 7 67 625 EAST 40 STREET BROOKLYN
## 8 67 625 EAST 40 STREET BROOKLYN
## 9 67 625 EAST 40 STREET BROOKLYN
## CRIME_CATEGORIZATION FRISK_AND_SEARCH
## 4 Theft Frisked and Searched
## 5 Theft Frisked and Searched
## 6 Theft Only Frisked
## 7 Possession,Sale of Prohibited Items Frisked and Searched
## 8 Possession,Sale of Prohibited Items Frisked and Searched
## 9 Possession,Sale of Prohibited Items Frisked and Searched
head(df_MANHATTAN_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 1 1 19:04:00 2018 January Monday Based on C/W on Scene
## 2 2 23:00:00 2018 January Monday Based on Radio Run
## 25 25 7:20:00 2018 January Monday Based on Radio Run
## 28 28 14:50:00 2018 January Tuesday Based on Radio Run
## 29 29 12:50:00 2018 January Tuesday Based on C/W on Scene
## 30 30 1:30:00 2018 January Tuesday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 1 POM 1 SGT
## 2 POM 34 SGT
## 25 POM 33 SGT
## 28 POF 804 SGT
## 29 POM 13 LT
## 30 POM 14 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 1 1 0
## 2 34 1
## 25 33 1
## 28 804 10
## 29 13 2
## 30 14 0
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 1 MENACING 18
## 2 CPW 15
## 25 ASSAULT 20
## 28 CRIMINAL TRESPASS 10
## 29 GRAND LARCENY 4
## 30 GRAND LARCENY AUTO 5
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 1 1 0
## 2 1 0
## 25 1 0
## 28 1 0
## 29 1 0
## 30 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 1 suspect not arrested 0 wearing uniform
## 2 suspect not arrested 0 wearing uniform
## 25 suspect not arrested 0 wearing uniform
## 28 suspect not arrested 0 wearing uniform
## 29 suspect not arrested 0 wearing uniform
## 30 suspect not arrested 0 wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 1 1 0 0 0
## 2 1 1 0 0
## 25 1 0 0 0
## 28 0 0 0 0
## 29 0 0 0 0
## 30 0 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 1 0 0 0
## 2 0 0 0
## 25 0 0 0
## 28 0 0 0
## 29 0 0 0
## 30 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 1 0 0
## 2 0 1
## 25 0 0
## 28 0 0
## 29 0 0
## 30 0 1
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 1 0 0
## 2 0 0
## 25 1 0
## 28 0 0
## 29 0 0
## 30 1 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 1 0 0
## 2 0 0
## 25 0 0
## 28 0 0
## 29 0 0
## 30 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 1 1
## 2 0
## 25 1
## 28 1
## 29 1
## 30 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 1 0
## 2 0
## 25 1
## 28 0
## 29 0
## 30 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 1 0
## 2 0
## 25 0
## 28 0
## 29 0
## 30 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 1 0
## 2 0
## 25 0
## 28 0
## 29 0
## 30 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 1 1
## 2 0
## 25 0
## 28 0
## 29 0
## 30 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 1 1 0
## 2 1 0
## 25 0 0
## 28 1 0
## 29 1 0
## 30 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 1 0 0
## 2 0 0
## 25 0 1
## 28 0 0
## 29 0 1
## 30 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 1 1 0
## 2 0 0
## 25 0 0
## 28 0 0
## 29 0 0
## 30 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 1 0 0
## 2 0 0
## 25 0 0
## 28 0 0
## 29 0 0
## 30 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 1 0 0
## 2 0 1
## 25 0 0
## 28 0 0
## 29 0 0
## 30 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 1 0 COOPERATIVE 0
## 2 0 NERVOUS 26
## 25 0 COOPERATIVE 21
## 28 0 N/A 26
## 29 0 COOPERATIVE 15
## 30 0 CALM 37
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 1 MALE WHITE 5.1 170
## 2 MALE BLACK HISPANIC 6.1 250
## 25 MALE BLACK HISPANIC 5.11 170
## 28 MALE BLACK 5.8 160
## 29 MALE BLACK null 180
## 30 MALE WHITE 5.9 150
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 1 MED BRO BLK
## 2 HEA BRO BLK
## 25 THN BRO BLK
## 28 MED BRO BLK
## 29 MED BLK BLK
## 30 THN BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 1 1 VARICK STREET && FRANKLIN STREET
## 2 34 DYCKMAN STREET && POST AVENUE
## 25 33 517 WEST 171 STREET
## 28 9 890 EAST 6 STREET
## 29 13 239 1 AVENUE
## 30 14 307 5 AVENUE
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 1 MANHATTAN Attack and Damage
## 2 MANHATTAN Possession,Sale of Prohibited Items
## 25 MANHATTAN Attack and Damage
## 28 MANHATTAN Attack and Damage
## 29 MANHATTAN Theft
## 30 MANHATTAN Theft
## FRISK_AND_SEARCH
## 1 Only Frisked
## 2 Frisked and Searched
## 25 Only Frisked
## 28 Neither Frisked Nor Searched
## 29 Neither Frisked Nor Searched
## 30 Neither Frisked Nor Searched
head(df_QUEENS_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 24 24 19:35:00 2018 January Monday Based on Radio Run
## 27 27 #N/A 2018 January Monday Based on Radio Run
## 41 41 8:30:00 2018 January Tuesday Based on C/W on Scene
## 42 42 19:22:00 2018 January Tuesday Based on Radio Run
## 43 43 19:22:00 2018 January Tuesday Based on Radio Run
## 44 44 18:48:00 2018 January Tuesday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 24 POM 103 SGT
## 27 POM 113 SGT
## 41 DTS 103 SGT
## 42 POM 106 SGT
## 43 POM 106 SGT
## 44 POM 809 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 24 103 1
## 27 113 0
## 41 103 1
## 42 106 1
## 43 106 1
## 44 809 1
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 24 CRIMINAL POSSESSION OF MARIHUANA 5
## 27 ASSAULT 14
## 41 THEFT OF SERVICES 15
## 42 BURGLARY 27
## 43 BURGLARY 27
## 44 CRIMINAL TRESPASS 3
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 24 1 0
## 27 1 0
## 41 1 0
## 42 1 0
## 43 1 0
## 44 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 24 suspect not arrested 0 wearing uniform
## 27 suspect not arrested 0 wearing uniform
## 41 suspect not arrested 0 wearing uniform
## 42 suspect not arrested 0 wearing uniform
## 43 suspect not arrested 0 wearing uniform
## 44 suspect arrested CRIMINAL TRESPASS wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 24 1 0 0 0
## 27 1 1 0 0
## 41 1 0 0 0
## 42 1 0 0 0
## 43 1 0 0 0
## 44 0 1 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 24 0 0 0
## 27 0 0 0
## 41 0 0 0
## 42 0 0 0
## 43 0 0 0
## 44 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 24 0 0
## 27 0 0
## 41 0 0
## 42 0 1
## 43 0 0
## 44 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 24 0 0
## 27 0 0
## 41 1 0
## 42 0 0
## 43 0 0
## 44 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 24 0 0
## 27 0 0
## 41 0 1
## 42 0 0
## 43 0 0
## 44 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 24 1
## 27 1
## 41 0
## 42 1
## 43 1
## 44 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 24 0
## 27 0
## 41 0
## 42 1
## 43 1
## 44 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 24 0
## 27 0
## 41 0
## 42 0
## 43 0
## 44 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 24 0
## 27 0
## 41 0
## 42 0
## 43 0
## 44 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 24 0
## 27 1
## 41 0
## 42 0
## 43 0
## 44 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 24 1 0
## 27 0 0
## 41 0 0
## 42 0 0
## 43 0 0
## 44 0 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 24 0 0
## 27 0 0
## 41 0 1
## 42 0 1
## 43 0 1
## 44 0 1
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 24 0 0
## 27 1 0
## 41 0 0
## 42 1 0
## 43 1 0
## 44 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 24 0 0
## 27 1 0
## 41 0 0
## 42 0 0
## 43 0 0
## 44 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 24 0 0
## 27 0 0
## 41 0 0
## 42 0 1
## 43 0 1
## 44 1 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 24 0 CALM 25
## 27 0 UNDERSTANDING 40
## 41 0 AGGRESSIVE 22
## 42 0 NERVOUS 37
## 43 0 NERVOUS 55
## 44 0 COOPRATIVE/ NORMAL 16
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 24 MALE BLACK HISPANIC 5.5 260
## 27 MALE BLACK 6.3 200
## 41 MALE BLACK 6.1 150
## 42 MALE ASIAN / PACIFIC ISLANDER 5.7 150
## 43 MALE ASIAN / PACIFIC ISLANDER 5.11 180
## 44 MALE BLACK 6.1 150
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 24 HEA BRO BRO
## 27 MED BRO BLK
## 41 THN BRO BLK
## 42 MED BRO BLK
## 43 MED BRO BLK
## 44 THN BRO BLK
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 24 103 170-06 89 AVENUE
## 27 113 201 STREET && 113 AVENUE
## 41 103 SUTPHIN BOULEVARD && JAMAICA AVENUE
## 42 106 135 PLACE && 131 AVENUE
## 43 106 135 PLACE && 131 AVENUE
## 44 114 3-04 ASTORIA BOULEVARD
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 24 QUEENS Possession,Sale of Prohibited Items
## 27 QUEENS Attack and Damage
## 41 QUEENS Theft
## 42 QUEENS Theft
## 43 QUEENS Theft
## 44 QUEENS Attack and Damage
## FRISK_AND_SEARCH
## 24 Only Frisked
## 27 Frisked and Searched
## 41 Only Frisked
## 42 Only Frisked
## 43 Only Frisked
## 44 Only Searched
head(df_SI_suspect)
## STOP_FRISK_ID Stop.Frisk.Time YEAR2 MONTH2 DAY2 STOP_WAS_INITIATED
## 46 46 15:50:00 2018 January Tuesday Based on Radio Run
## 47 47 12:34:00 2018 January Tuesday Based on Radio Run
## 48 48 15:50:00 2018 January Tuesday Based on Radio Run
## 82 82 21:14:00 2018 January Thursday Based on Radio Run
## 83 83 21:14:00 2018 January Thursday Based on Radio Run
## 96 96 10:50:00 2018 January Friday Based on Self Initiated
## ISSUING_OFFICER_RANK ISSUING_OFFICER_COMMAND_CODE SUPERVISING_OFFICER_RANK
## 46 POM 446 SSA
## 47 POM 446 SGT
## 48 POM 446 SSA
## 82 POM 121 SGT
## 83 POM 121 SGT
## 96 DT3 432 SGT
## SUPERVISING_OFFICER_COMMAND_CODE OBSERVED_DURATION_MINUTES
## 46 446 1
## 47 446 1
## 48 446 1
## 82 121 5
## 83 121 5
## 96 432 2
## SUSPECTED_CRIME_DESCRIPTION STOP_DURATION_MINUTES
## 46 CPW 5
## 47 BURGLARY 37
## 48 CPW 5
## 82 ROBBERY 10
## 83 ROBBERY 10
## 96 GRAND LARCENY 3
## OFFICER_EXPLAINED_STOP_FLAG OFFICER_NOT_EXPLAINED_STOP_DESCRIPTION
## 46 1 0
## 47 1 0
## 48 1 0
## 82 1 0
## 83 1 0
## 96 1 0
## SUSPECT_ARRESTED_FLAG SUSPECT_ARREST_OFFENSE OFFICER_IN_UNIFORM_FLAG
## 46 suspect not arrested 0 wearing uniform
## 47 suspect arrested BURGLARY wearing uniform
## 48 suspect not arrested 0 wearing uniform
## 82 suspect arrested ROBBERY wearing uniform
## 83 suspect arrested ROBBERY wearing uniform
## 96 suspect not arrested 0 not wearing uniform
## FRISKED_FLAG SEARCHED_FLAG OTHER_CONTRABAND_FLAG FIREARM_FLAG
## 46 1 0 0 0
## 47 1 0 0 0
## 48 1 0 0 0
## 82 1 1 0 0
## 83 1 1 1 0
## 96 0 0 0 0
## KNIFE_CUTTER_FLAG OTHER_WEAPON_FLAG WEAPON_FOUND_FLAG
## 46 0 0 0
## 47 0 0 0
## 48 0 0 0
## 82 0 0 0
## 83 0 0 0
## 96 0 0 0
## PHYSICAL_FORCE_CEW_FLAG PHYSICAL_FORCE_DRAW_POINT_FIREARM_FLAG
## 46 0 0
## 47 0 0
## 48 0 0
## 82 0 0
## 83 0 0
## 96 0 0
## PHYSICAL_FORCE_HANDCUFF_SUSPECT_FLAG PHYSICAL_FORCE_OC_SPRAY_USED_FLAG
## 46 0 0
## 47 0 0
## 48 0 0
## 82 0 0
## 83 0 0
## 96 0 0
## PHYSICAL_FORCE_OTHER_FLAG PHYSICAL_FORCE_RESTRAINT_USED_FLAG
## 46 0 0
## 47 0 0
## 48 0 0
## 82 0 0
## 83 0 0
## 96 0 0
## PHYSICAL_FORCE_VERBAL_INSTRUCTION_FLAG
## 46 1
## 47 1
## 48 1
## 82 1
## 83 1
## 96 1
## BACKROUND_CIRCUMSTANCES_VIOLENT_CRIME_FLAG
## 46 0
## 47 1
## 48 0
## 82 1
## 83 1
## 96 0
## BACKROUND_CIRCUMSTANCES_SUSPECT_KNOWN_TO_CARRY_WEAPON_FLAG
## 46 0
## 47 0
## 48 0
## 82 0
## 83 0
## 96 0
## SUSPECTS_ACTIONS_CASING_FLAG
## 46 0
## 47 0
## 48 0
## 82 0
## 83 0
## 96 0
## SUSPECTS_ACTIONS_CONCEALED_POSSESSION_WEAPON_FLAG
## 46 0
## 47 0
## 48 1
## 82 0
## 83 0
## 96 0
## SUSPECTS_ACTIONS_DECRIPTION_FLAG SUSPECTS_ACTIONS_DRUG_TRANSACTIONS_FLAG
## 46 1 0
## 47 1 0
## 48 0 0
## 82 1 0
## 83 1 0
## 96 1 0
## SUSPECTS_ACTIONS_IDENTIFY_CRIME_PATTERN_FLAG SUSPECTS_ACTIONS_OTHER_FLAG
## 46 0 0
## 47 0 0
## 48 0 0
## 82 0 0
## 83 0 0
## 96 0 0
## SUSPECTS_ACTIONS_PROXIMITY_TO_SCENE_FLAG SEARCH_BASIS_ADMISSION_FLAG
## 46 1 0
## 47 1 0
## 48 1 0
## 82 1 0
## 83 1 0
## 96 0 0
## SEARCH_BASIS_CONSENT_FLAG SEARCH_BASIS_HARD_OBJECT_FLAG
## 46 0 0
## 47 0 0
## 48 0 0
## 82 1 0
## 83 1 0
## 96 0 0
## SEARCH_BASIS_INCIDENTAL_TO_ARREST_FLAG SEARCH_BASIS_OTHER_FLAG
## 46 0 0
## 47 0 0
## 48 0 0
## 82 1 0
## 83 1 0
## 96 0 0
## SEARCH_BASIS_OUTLINE_FLAG DEMEANOR_OF_PERSON_STOPPED SUSPECT_REPORTED_AGE
## 46 0 CALM 30
## 47 0 CALM. QUIET. 18
## 48 0 CALM 35
## 82 0 NERVOUS 23
## 83 0 CALM 22
## 96 0 CALM 33
## SUSPECT_SEX SUSPECT_RACE_DESCRIPTION SUSPECT_HEIGHT SUSPECT_WEIGHT
## 46 MALE WHITE 6.8 180
## 47 MALE WHITE HISPANIC 5.1 120
## 48 MALE WHITE 6.4 190
## 82 MALE BLACK 5.7 160
## 83 MALE BLACK 6.1 170
## 96 MALE WHITE 6.3 215
## SUSPECT_BODY_BUILD_TYPE SUSPECT_EYE_COLOR SUSPECT_HAIR_COLOR
## 46 MED ZZZ BRO
## 47 THN BRO BRO
## 48 MED ZZZ BRO
## 82 THN BLK BLK
## 83 THN BLK BLK
## 96 MED BRO BRO
## STOP_LOCATION_PRECINCT STOP_LOCATION_FULL_ADDRESS
## 46 121 FOREST HILL ROAD && RUMSON ROAD
## 47 121 WILD AVENUE && ROSWELL AVENUE
## 48 121 FOREST HILL ROAD && RUMSON ROAD
## 82 121 HEBERTON AVENUE && BENNETT STREET
## 83 121 HEBERTON AVENUE && BENNETT STREET
## 96 120 595 BAY STREET
## STOP_LOCATION_BORO_NAME CRIME_CATEGORIZATION
## 46 STATEN ISLAND Possession,Sale of Prohibited Items
## 47 STATEN ISLAND Theft
## 48 STATEN ISLAND Possession,Sale of Prohibited Items
## 82 STATEN ISLAND Theft
## 83 STATEN ISLAND Theft
## 96 STATEN ISLAND Theft
## FRISK_AND_SEARCH
## 46 Only Frisked
## 47 Only Frisked
## 48 Only Frisked
## 82 Frisked and Searched
## 83 Frisked and Searched
## 96 Neither Frisked Nor Searched
# accuracy on STOP_LOCATION_BORO_NAME
df_BRONX_suspect[df_BRONX_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "BRONX_suspect not arrested"
df_BRONX_suspect[df_BRONX_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "BRONX_suspect arrested"
table(df_BRONX_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 626 1705
df_BROOKLYN_suspect[df_BROOKLYN_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "BROOKLYN_suspect not arrested"
df_BROOKLYN_suspect[df_BROOKLYN_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "BROOKLYN_suspect arrested"
table(df_BROOKLYN_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 912 2720
df_MANHATTAN_suspect[df_MANHATTAN_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "MANHATTAN_suspect not arrested"
df_MANHATTAN_suspect[df_MANHATTAN_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "MANHATTAN_suspect arrested"
table(df_MANHATTAN_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 901 1956
df_QUEENS_suspect[df_QUEENS_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "QUEENS_suspect not arrested"
df_QUEENS_suspect[df_QUEENS_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "QUEENS_suspect arrested"
table(df_QUEENS_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 554 1294
df_SI_suspect[df_SI_suspect$SUSPECT_ARRESTED_FLAG==0,"SUSPECT_ARRESTED_FLAG"] <- "SI_suspect not arrested"
df_SI_suspect[df_SI_suspect$SUSPECT_ARRESTED_FLAG==1,"SUSPECT_ARRESTED_FLAG"] <- "SI_suspect arrested"
table(df_SI_suspect$SUSPECT_ARRESTED_FLAG)
##
## suspect arrested suspect not arrested
## 122 218
BRONX_a_s_acc <- 626/(626+1705)
print(BRONX_a_s_acc)
## [1] 0.2685543
BROOKLYN_a_s_acc <- 912/(912+2720)
print(BROOKLYN_a_s_acc)
## [1] 0.2511013
MANHATTAN_a_s_acc <- 901/(901+1956)
print(MANHATTAN_a_s_acc)
## [1] 0.3153658
QUEENS_a_s_acc <- 554/(554+1294)
print(QUEENS_a_s_acc)
## [1] 0.2997835
SI_a_s_acc <- 122/(122+218)
print(SI_a_s_acc)
## [1] 0.3588235
# function1: variable X VS observe duration minutes (box plots && scatterpLots)
observe_time_relation <- function(m){
if(class(m) == "character"){
ggplot(NYPD, aes(x = m, y = OBSERVED_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 35))
}else{
ggplot(NYPD, aes(m, OBSERVED_DURATION_MINUTES)) + geom_point() + coord_cartesian(ylim=c(0, 35))
}
}
# function2: variable X VS stop duration minutes (box plots && scatterpLots)
stop_time_relation <- function(n){
if(class(n) == "character"){
ggplot(NYPD, aes(x = n, y = STOP_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 50))
}else{
ggplot(NYPD, aes(n, STOP_DURATION_MINUTES)) + geom_point() + coord_cartesian(ylim=c(0, 50))
}
}
observe_time_relation(NYPD$SUSPECT_SEX)
## Suspect Reported Ages
# overall visualization
class(NYPD$SUSPECT_REPORTED_AGE)
## [1] "integer"
ggplot(NYPD,aes(SUSPECT_REPORTED_AGE)) + geom_histogram(colour = "orange3", fill = "orange3",alpha=0.8) + labs(title="Distribution of Suspect Reported Ages ", y="count", x="suspect reported age")
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
# VS observed time
observe_time_relation(NYPD$SUSPECT_REPORTED_AGE) + labs(title="Relation between Suspect Reported Ages and Observed Time ", y="observed duration mins", x="suspect reported ages")
# VS stop time
stop_time_relation(NYPD$SUSPECT_REPORTED_AGE) + labs(title="Relation between Suspect Reported Ages and Stop Time ", y="stopped duration mins", x="suspect reported ages")
## SUSPECT SEX
# overall visualization
class(NYPD$SUSPECT_SEX)
## [1] "character"
ggplot(NYPD, aes(SUSPECT_SEX)) + geom_bar(alpha=0.90, colour="salmon", fill="salmon",width=0.75) + labs(title="Distribution of Suspect Sex", y="count", x="suspect sex")
# VS observed time
observe_time_relation(NYPD$SUSPECT_SEX) + labs(title="Observed Time for Different Suspect Sex", y="observed duration mins", x="suspect sex")
# VS stop time
stop_time_relation(NYPD$SUSPECT_SEX) + labs(title="Stop Time for Different Suspect Sex", y="stopped duration mins", x="suspect sex")
## SUSPECT RACE DESCRIPTION
# overall visualization
class(NYPD$SUSPECT_RACE_DESCRIPTION)
## [1] "character"
ggplot(NYPD, aes(SUSPECT_RACE_DESCRIPTION)) + geom_bar(alpha=0.90, colour="salmon", fill="salmon",width=0.5) + labs(title="Distribution of Suspect Race Description", y="count", x="suspect race description") + theme(axis.text.x=element_text(size=4.3))
# VS observed time
observe_time_relation(NYPD$SUSPECT_RACE_DESCRIPTION) + labs(title="Observed Time for Different Suspect Race Descriptions", y="observed duration mins", x="suspect race descriptions") +theme(axis.text.x=element_text(size=4.3))
# VS stop time
stop_time_relation(NYPD$SUSPECT_RACE_DESCRIPTION) + labs(title="Stop Time for Different Suspect Race Descriptions", y="stopped duration mins", x="suspect race descriptions") +theme(axis.text.x=element_text(size=4.3))
## SUSPECT HEIGHT
# overall visualization
NYPD$SUSPECT_HEIGHT <- as.numeric(NYPD$SUSPECT_HEIGHT)
## Warning: NAs introduced by coercion
ggplot(NYPD,aes(SUSPECT_HEIGHT)) + geom_histogram(colour = "orange3", fill = "orange3",alpha=0.8) + labs(title="Distribution of Suspect Heights", y="count", x="suspect height")
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
## Warning: Removed 377 rows containing non-finite values (stat_bin).
# VS observed time
observe_time_relation(NYPD$SUSPECT_HEIGHT) + labs(title="Relation between Suspect Height and Observed Time ", y="observed duration mins", x="suspect height")
## Warning: Removed 377 rows containing missing values (geom_point).
# VS stop time
stop_time_relation(NYPD$SUSPECT_HEIGHT) + labs(title="Relation between Suspect Height and Stop Time ", y="stopped duration mins", x="suspect height")
## Warning: Removed 377 rows containing missing values (geom_point).
# SUSPECT WEIGHT
# overall visualization
NYPD$SUSPECT_WEIGHT <- as.numeric(NYPD$SUSPECT_WEIGHT)
## Warning: NAs introduced by coercion
ggplot(NYPD,aes(SUSPECT_WEIGHT)) + geom_histogram(colour = "orange3", fill = "orange3",alpha=0.8) + labs(title="Distribution of Suspect Weights", y="count", x="suspect weight")
## `stat_bin()` using `bins = 30`. Pick better value with `binwidth`.
## Warning: Removed 408 rows containing non-finite values (stat_bin).
# VS observed time
observe_time_relation(NYPD$SUSPECT_WEIGHT) + labs(title="Relation between Suspect Weight and Observed Time ", y="observed duration mins", x="suspect weight")
## Warning: Removed 408 rows containing missing values (geom_point).
# VS stop time
stop_time_relation(NYPD$SUSPECT_WEIGHT) + labs(title="Relation between Suspect Weight and Stop Time ", y="stopped duration mins", x="suspect weight")
## Warning: Removed 408 rows containing missing values (geom_point).
# SUSPECT BODY BUILD TYPE
# overall visualization
class(NYPD$SUSPECT_BODY_BUILD_TYPE)
## [1] "character"
ggplot(NYPD, aes(SUSPECT_BODY_BUILD_TYPE)) + geom_bar(alpha=0.90, colour="tomato", fill="tomato",width=0.5) + labs(title="Distribution of Suspect Body Build Type", y="count", x="suspect body build type")
# VS observed time
observe_time_relation(NYPD$SUSPECT_BODY_BUILD_TYPE) + labs(title="Observed Time for Different Suspect Body Build Types", y="observed duration mins", x="suspect body build type")
# VS stop time
stop_time_relation(NYPD$SUSPECT_BODY_BUILD_TYPE) + labs(title="Stop Time for Different Suspect Body Build Types", y="stopped duration mins", x="suspect body build type")
# SUSPECT EYE COLOR
# overall visualization
unique(NYPD$SUSPECT_EYE_COLOR)
## [1] "BRO" "BLK" "GRY" "HAZ" "ZZZ" "BLU" "0" "GRN" "MUL" "OTH"
ggplot(NYPD, aes(SUSPECT_EYE_COLOR)) + geom_bar(alpha=0.90, colour="tomato", fill="tomato",width=0.5) + labs(title="Distribution of Suspect Eye Colors", y="count", x="suspect eye color")
# VS observed time
observe_time_relation(NYPD$SUSPECT_EYE_COLOR) + labs(title="Observed Time for Different Suspect Eye Colors", y="observed duration mins", x="suspect eye color")
# VS stop time
stop_time_relation(NYPD$SUSPECT_EYE_COLOR) + labs(title="Stop Time for Different Suspect Eye Colors", y="stopped duration mins", x="suspect eye color")
# SUSPECT HAIR COLOR
# overall visualization
unique(NYPD$SUSPECT_HAIR_COLOR)
## [1] "BLK" "BLD" "XXX" "BLN" "BRO" "GRY" "ZZZ" "ORG" "RED" "0" "WHI" "PLE"
## [13] "PNK" "SDY" "GRN"
ggplot(NYPD, aes(SUSPECT_HAIR_COLOR)) + geom_bar(alpha=0.90, colour="tomato", fill="tomato",width=0.5) + labs(title="Distribution of Suspect Hair Colors", y="count", x="suspect hair color")
# VS observed time
observe_time_relation(NYPD$SUSPECT_HAIR_COLOR) + labs(title="Observed Time for Different Suspect Hair Colors", y="observed duration mins", x="suspect hair color")
# VS stop time
stop_time_relation(NYPD$SUSPECT_HAIR_COLOR) + labs(title="Stop Time for Different Suspect Hair Colors", y="stopped duration mins", x="suspect hair color")
# STOP LOCATION BOROUGH NAME
# overall visualization
table(NYPD$STOP_LOCATION_BORO_NAME)
##
## BRONX BROOKLYN MANHATTAN QUEENS STATEN ISLAND
## 2331 3632 2857 1848 340
ggplot(NYPD, aes(STOP_LOCATION_BORO_NAME)) + geom_bar(alpha=0.90, colour="orange3", fill="orange3",width=0.5) + labs(title="Distribution of Suspect Location Boroughs", y="count", x="stop borough")
# VS observed time
observe_time_relation(NYPD$STOP_LOCATION_BORO_NAME) + labs(title="Observed Time for Different Suspect Location Boroughs", y="observed duration mins", x="suspect borough")
# VS stop time
stop_time_relation(NYPD$STOP_LOCATION_BORO_NAME) + labs(title="Stop Time for Different Suspect Location Boroughs", y="stopped duration mins", x="suspect borough")
# //
# To verify function1 and function2
# Borough VS Stop Time
mean(NYPD$STOP_DURATION_MINUTES)
## [1] 11.58376
median(NYPD$STOP_DURATION_MINUTES)
## [1] 8
ggplot(NYPD, aes(x = STOP_LOCATION_BORO_NAME, y = STOP_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 50))
# Borough VS Observe Time
mean(NYPD$OBSERVED_DURATION_MINUTES)
## [1] 21.64707
median(NYPD$OBSERVED_DURATION_MINUTES)
## [1] 1
ggplot(NYPD, aes(x = STOP_LOCATION_BORO_NAME, y = OBSERVED_DURATION_MINUTES)) + geom_boxplot() + coord_cartesian(ylim=c(0, 35))